--- loncom/lonhttpd 2003/07/01 19:57:45 1.8 +++ loncom/lonhttpd 2003/07/30 15:28:56 1.9 @@ -1,5 +1,5 @@ #!/usr/bin/perl -# $Id: lonhttpd,v 1.8 2003/07/01 19:57:45 albertel Exp $ +# $Id: lonhttpd,v 1.9 2003/07/30 15:28:56 www Exp $ $VERSION = "1.3.2 (Demonic/Linux/LON-CAPA Derivative $Revison$)"; @@ -260,7 +260,9 @@ EOF } -sub bye { unlink($pidfile); exit; } +sub bye { exit; } + +sub goodbye { unlink($pidfile); exit; } sub dead { &htsponse(500, "Server Error"); @@ -276,7 +278,8 @@ EOF } $SIG{'__DIE__'} = \&dead; -$SIG{'ALRM'} = $SIG{'TERM'} = $SIG{'INT'} = \&bye; +$SIG{'ALRM'} = \&bye; +$SIG{'TERM'} = $SIG{'INT'} = \&goodbye; sub master { $0 = "lonhttpd: (dhttpi) handling request";