diff options
Diffstat (limited to 'iurt2')
-rwxr-xr-x | iurt2 | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -72,7 +72,8 @@ my (@stat) = stat $pidfile; my $pid = <PID>; close PID; if ($pid && getpgrp $pid != -1) { - if ($stat[9] < time - 36000) { + my $time = $stat[9]; + if ($time < time - 36000) { print "An other iurt pid $pid is running for a very long time, killing it\n"; my $i; while ($i < 5 && getpgrp $pid != -1) { @@ -81,7 +82,7 @@ my (@stat) = stat $pidfile; sleep 1 } } else { - print "An other iurt is running for $my_arch, pid $pid\n"; + print "An other iurt is running for $my_arch, pid $pid, since $time seconds\n"; exit } } else { |