Return to LondConnection.pm CVS log | Up to [LON-CAPA] / loncom |
version 1.17, 2003/11/04 11:22:48 | version 1.18, 2003/12/02 10:38:40 |
---|---|
Line 562 Shuts down the socket. | Line 562 Shuts down the socket. |
sub Shutdown { | sub Shutdown { |
my $self = shift; | my $self = shift; |
my $socket = $self->GetSocket(); | my $socket = $self->GetSocket(); |
$socket->send("exit\n", 0); # Ask lond to exit too. Non blocking so | |
# there's no cost for failure. | |
$socket->shutdown(2); | $socket->shutdown(2); |
} | } |