Error reason in both errors

diff --git a/lib/FCGI/ProcManager.pm b/lib/FCGI/ProcManager.pm
index c1c4023..8d42717 100644 (file)
--- a/lib/FCGI/ProcManager.pm
+++ b/lib/FCGI/ProcManager.pm
@@ -365,7 +365,7 @@ sub pm_write_pid_file {
     return;
   }
   print $PIDFILE "$$\n" or die "Could not print PID: $!";
-  close $PIDFILE or die "Could not close PID file";
+  close $PIDFILE or die "Could not close PID file: $!";
 }
 
 =head2 pm_remove_pid_file