X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fbye.pl;fp=cmd%2Fbye.pl;h=9288d44264402db471db2c00af3d55c6841c0498;hb=abbcfa7500858a2eba4135b0af5db9f3fca8d68e;hp=513b3055af6fa4bca41f5b1d8bddef23de27f874;hpb=1eabcdd60799121b40f4d2ddb3b977fa0b2aeb94;p=spider.git diff --git a/cmd/bye.pl b/cmd/bye.pl index 513b3055..9288d442 100644 --- a/cmd/bye.pl +++ b/cmd/bye.pl @@ -4,19 +4,16 @@ # # + my $self = shift; return (1, $self->msg('e5')) if $self->inscript; -# log out text -if ($self->is_user && -e localdata("logout")) { - open(I, localdata("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')); -#$self->send_now('Z', ""); +if ($self->is_user && -e $fn) { + $self->send_file($fn); +} $self->disconnect;