[svn:qpsmtpd] rev 536 - branches/0.31

Author: aqua
Date: Sat Jul 30 02:32:36 2005
New Revision: 536

Modified:
   branches/0.31/qpsmtpd-forkserver
Log:
Fix unitialized-value warning if the PID file existed but was zero-length
at startup time.


Modified: branches/0.31/qpsmtpd-forkserver
==============================================================================
--- branches/0.31/qpsmtpd-forkserver	(original)
+++ branches/0.31/qpsmtpd-forkserver	Sat Jul 30 02:32:36 2005
@@ -110,7 +110,7 @@ if ($PID_FILE) {
   if (-e $PID_FILE) {
     open PID, "+<$PID_FILE"
       or die "open pid_file: $!\n";
-    my $running_pid = <PID>; chomp $running_pid;
+    my $running_pid = <PID> || ''; chomp $running_pid;
     if ($running_pid =~ /(\d+)/) {
       $running_pid = $1;
       if (kill 0, $running_pid) {