cmd/bye.pl

   1 #
   2 # the bye command
   3 #
   4 #
   5 #
   6
   7
   8 my $self = shift;
   9 return (1, $self->msg('e5')) if $self->inscript || $self->remotecmd;
  10
  11 my $fn = localdata("logout");
  12 #dbg("fn: $fn " . (-e $fn ? 'exists' : 'missing'));
  13
  14 if ($self->is_user && -e $fn) {
  15         $self->send_file($fn);
  16 }
  17
  18 $self->disconnect;
  19
  20 return (1);