![[BACK]](/icons/back.gif){kind=icon}
Return to lonhttpd CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom|
Return to lonhttpd CVS log | Up to [LON-CAPA] / loncom |
| version 1.9, 2003/07/30 15:28:56 | version 1.10, 2005/02/14 00:18:03 |
|---|---|
| Line 61 $pidfile="/home/httpd/perl/logs/lonhttpd | Line 61 $pidfile="/home/httpd/perl/logs/lonhttpd |
| if (-e $pidfile) { | if (-e $pidfile) { |
| open(LFH,"$pidfile"); | open(LFH,"$pidfile"); |
| my $pide=<$LFH>; | my $pide=<LFH>; |
| chomp($pide); | chomp($pide); |
| close(LFH); | close(LFH); |
| if (kill 0 => $pide) { die "already running"; } | if (kill 0 => $pide) { die "already running"; } |