oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

stale PID file detection -- previous patch cleanup and supress uninit warning

Browse source
This commit is contained in:
Scott Walters 2010-05-28 08:38:38 -04:00
parent b5b841e19b
commit 14d249d3f0
1 changed files with 1 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
sbin/spectre.pl
View file

@ -105,10 +105,9 @@ elsif ($daemon) {
die "Spectre is already running.\n";
}
elsif (-e $pidFileName){
# oh, ffs ... die "pidFile $pidFileName already exists\n";
open my $pidFile, '<', $pidFileName or die "$pidFileName: $!";
(my $pid) = readline $pidFile;
chomp $pid;
chomp $pid if defined $pid;
if(defined $pid and $pid =~ m/^(\d+)$/) {
if(kill 0, $1) {
die "$0: already running as PID $1";