X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fbye.pl;h=be2ba79ccba10390bde6f310b85283cd5993d773;hb=refs%2Fheads%2Fstaging;hp=d6e2d14becc76790295e429a02a093bb15653f54;hpb=586cbb347e7639f5575b48572e75140501a109c0;p=spider.git diff --git a/cmd/bye.pl b/cmd/bye.pl index d6e2d14b..be2ba79c 100644 --- a/cmd/bye.pl +++ b/cmd/bye.pl @@ -1,19 +1,20 @@ # # the bye command # -# $Id$ # +# + my $self = shift; +return (1, $self->msg('e5')) if $self->inscript || $self->remotecmd; -# 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); +my $fn = localdata("logout"); +#dbg("fn: $fn " . (-e $fn ? 'exists' : 'missing')); + +if ($self->is_user && -e $fn) { + $self->send_file($fn); } -$self->state('bye'); +$self->disconnect; + return (1);