From: erickson <erickson@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Mon, 4 Aug 2008 01:43:34 +0000 (+0000)
Subject: wait for the parent proc to go away before we unlink the file
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=bd48776a8a46df0f9c1ad56d40fde852e428eb0d;p=working%2FOpenSRF.git

wait for the parent proc to go away before we unlink the file

git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@1385 9efc2488-bf62-4759-914b-345cdb29e865
---

diff --git a/bin/opensrf-perl.pl b/bin/opensrf-perl.pl
index 3ab5f57..7211601 100755
--- a/bin/opensrf-perl.pl
+++ b/bin/opensrf-perl.pl
@@ -57,6 +57,7 @@ sub do_stop {
     if(-e $pid_file) {
         my $pid = `cat $pid_file`;
         kill('INT', $pid);
+        waitpid($pid, 0);
         unlink $pid_file;
     } else {
         msg("$service not running");