X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fbye.pl;h=13195c60ebb3a38820c8f9f77e0e3de841746025;hb=5a5a0fce49c14f8fa065fd3601a36535625087b6;hp=1fc73f66648a9251cb327d9c5923902adc20d308;hpb=6b6a8002929017b6d4217f68fa492a2d728ee1fe;p=spider.git diff --git a/cmd/bye.pl b/cmd/bye.pl index 1fc73f66..13195c60 100644 --- a/cmd/bye.pl +++ b/cmd/bye.pl @@ -5,5 +5,16 @@ # my $self = shift; -$self->state('bye'); + +# log out text +if ($self->is_user && -e "$main::data/logout") { + open(I, "$main::data/logout") or confess; + my @in = ; + close(I); + $self->send_now('D', @in); + sleep(1); +} + +$self->disconnect; + return (1);