logout with telnet session is not good reason to die
authorDobrica Pavlinusic <dpavlin@rot13.org>
Mon, 20 Jun 2011 13:53:14 +0000 (15:53 +0200)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Mon, 20 Jun 2011 13:53:14 +0000 (15:53 +0200)
lib/H1/ZTE.pm

index 08b1b6d..2615ba3 100755 (executable)
@@ -96,8 +96,8 @@ sub hash {
 sub logout {
        my $self = shift;
        my $ip = $self->ip;
-       my $t = delete $telnet->{$ip};
-       die "no $ip telnet in ",dump($telnet) unless $t;
+       my $t = delete $telnet->{$ip} || return;
+#      die "no $ip telnet in ",dump($telnet) unless $t;
 
        warn "logout $ip";
        $t->print('logout');