X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=cmd%2Fbye.pl;h=d43e257a5aa21d91ff1146aaea4a45ce9e0fc549;hb=9e8b70da52136e061fee9f8a219c713cc1d7df4d;hp=d6e2d14becc76790295e429a02a093bb15653f54;hpb=586cbb347e7639f5575b48572e75140501a109c0;p=spider.git diff --git a/cmd/bye.pl b/cmd/bye.pl index d6e2d14b..d43e257a 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);