projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
try again
[spider.git]
/
perl
/
Thingy
/
Hello.pm
diff --git
a/perl/Thingy/Hello.pm
b/perl/Thingy/Hello.pm
index aa51de1c539ba7fce04fbf08b2d70e0605e1e047..6c64302662e8bb505cd22bf5215c525a9c1c7c47 100644
(file)
--- a/
perl/Thingy/Hello.pm
+++ b/
perl/Thingy/Hello.pm
@@
-39,11
+39,11
@@
sub gen_Aranea
if ($thing->{user}) {
$thing->{h} ||= $dxchan->here;
} else {
if ($thing->{user}) {
$thing->{h} ||= $dxchan->here;
} else {
- $thing->add_auth;
$thing->{sw} ||= 'DXSp';
$thing->{sw} ||= 'DXSp';
- $thing->{v} ||= $main::version;
- $thing->{b} ||= $main::build;
+ $thing->{v} ||= $main::
me->
version;
+ $thing->{b} ||= $main::
me->
build;
$thing->{h} ||= $main::me->here;
$thing->{h} ||= $main::me->here;
+ $thing->add_auth;
}
$thing->{Aranea} = Aranea::genmsg($thing, [qw(sw h v b s auth)]);
}
$thing->{Aranea} = Aranea::genmsg($thing, [qw(sw h v b s auth)]);