]> dxcluster.net Git - spider.git/blob - cmd/bye.pl
added PC17 "improvement"
[spider.git] / cmd / bye.pl
1 #
2 # the bye command
3 #
4 # $Id$
5 #
6
7 my $self = shift;
8
9 # log out text
10 if ($self->is_user && -e "$main::data/logout") {
11         open(I, "$main::data/logout") or confess;
12         my @in = <I>;
13         close(I);
14         $self->send_now('D', @in);
15         sleep(1);
16 }
17
18 #$self->send_now('Z', "");
19
20 $self->disconnect;
21
22 return (1);