--- loncom/LondConnection.pm 2003/11/04 11:22:48 1.17 +++ loncom/LondConnection.pm 2003/12/02 10:38:40 1.18 @@ -1,7 +1,7 @@ # This module defines and implements a class that represents # a connection to a lond daemon. # -# $Id: LondConnection.pm,v 1.17 2003/11/04 11:22:48 foxr Exp $ +# $Id: LondConnection.pm,v 1.18 2003/12/02 10:38:40 foxr Exp $ # # Copyright Michigan State University Board of Trustees # @@ -562,6 +562,8 @@ Shuts down the socket. sub Shutdown { my $self = shift; 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); }