From 0a81dd5596a3bd7746f00bad8f7c61b8d823a2ac Mon Sep 17 00:00:00 2001 From: minima Date: Tue, 16 Jan 2007 00:52:28 +0000 Subject: [PATCH] put the state back correctly in pc22 --- perl/DXProtHandle.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) 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 -- 2.34.1