projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
1. Sysops can now have full privileges if there is a ExtMsg listener on
[spider.git]
/
perl
/
DXProt.pm
diff --git
a/perl/DXProt.pm
b/perl/DXProt.pm
index e92ca8a1acbada27e04fac33e8e3c64dd105d24b..ef3f331707180c754807f085411992367b1b267c 100644
(file)
--- a/
perl/DXProt.pm
+++ b/
perl/DXProt.pm
@@
-242,7
+242,7
@@
sub start
$self->{lastping} = $main::systime + ($self->pingint / 2);
}
$self->state('init');
$self->{lastping} = $main::systime + ($self->pingint / 2);
}
$self->state('init');
- $self->
pc50_t(time)
;
+ $self->
{pc50_t} = $main::systime
;
# send info to all logged in thingies
$self->tell_login('loginn');
# send info to all logged in thingies
$self->tell_login('loginn');
@@
-1119,9
+1119,9
@@
sub process
next if $dxchan == $me;
# send a pc50 out on this channel
next if $dxchan == $me;
# send a pc50 out on this channel
- if ($t >= $dxchan->
pc50_t
+ $DXProt::pc50_interval) {
+ if ($t >= $dxchan->
{pc50_t}
+ $DXProt::pc50_interval) {
$dxchan->send(pc50(scalar DXChannel::get_all_users));
$dxchan->send(pc50(scalar DXChannel::get_all_users));
- $dxchan->
pc50_t($t)
;
+ $dxchan->
{pc50_t} = $t
;
}
# send a ping out on this channel
}
# send a ping out on this channel