From: minima Date: Tue, 16 Jan 2007 00:52:28 +0000 (+0000) Subject: put the state back correctly in pc22 X-Git-Tag: 1.54~30 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=0a81dd5596a3bd7746f00bad8f7c61b8d823a2ac;p=spider.git put the state back correctly in pc22 --- diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm index 7332d669..748506be 100644 --- a/perl/DXProtHandle.pm +++ b/perl/DXProtHandle.pm @@ -879,9 +879,6 @@ sub handle_22 my $line = shift; my $origin = shift; - $self->state('normal'); - $self->{lastping} = 0; - if ($self->{do_pc92}) { if ($self->{state} ne 'init92') { dbg("PCPROT: disconnecting because login call not sent in any pc92") if isdbg('chanerr'); @@ -900,6 +897,8 @@ sub handle_22 } else { $self->send_delayed_pc92; } + $self->{lastping} = 0; + $self->state('normal'); } # WWV info