]> dxcluster.org Git - spider.git/commitdiff
fixed double logout messages
authorminima <minima>
Mon, 3 Sep 2001 18:51:34 +0000 (18:51 +0000)
committerminima <minima>
Mon, 3 Sep 2001 18:51:34 +0000 (18:51 +0000)
perl/DXCommandmode.pm

index b6140082f6a741b59ab5ece9541823213e2eafaa..ff173906bebef9945743b6e5eeb089bca430a886 100644 (file)
@@ -425,6 +425,9 @@ sub disconnect
 {
        my $self = shift;
        my $call = $self->call;
+
+       return if $self->{disconnecting}++;
+
        delete $self->{senddbg};
 
        my $uref = Route::User::get($call);