From: minima Date: Thu, 24 Feb 2005 11:14:56 +0000 (+0000) Subject: fix type in broadcast X-Git-Tag: R_1_52~143 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=cce337f777f0b7668cceebb40527fd1e106729c9;p=spider.git fix type in broadcast --- diff --git a/perl/DXProt.pm b/perl/DXProt.pm index 354d6f5d..f00a436a 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -225,6 +225,7 @@ sub init $main::me->{registered} = 1; $main::me->{version} = 5252 + $main::version; $main::me->{build} = $main::build; + $main::me->{lastcf} = $main::me->{lasthello} = time; } # diff --git a/perl/Thingy.pm b/perl/Thingy.pm index 08d14667..c1f010c1 100644 --- a/perl/Thingy.pm +++ b/perl/Thingy.pm @@ -105,7 +105,7 @@ sub broadcast next if $dxchan == $main::me; next if grep $dxchan == $_, @_; next if $dxchan->{call} eq $thing->{origin}; - next if $thing->{user} && !dxchan->is_user && $dxchan->{call} eq $thing->{user}; + next if $thing->{user} && !$dxchan->is_user && $dxchan->{call} eq $thing->{user}; dbg("Thingy::broadcast: sending to $dxchan->{call}") if isdbg('thing'); $thing->send($dxchan);