Drop PID file when exiting guardian.

[people/stevee/guardian.git] / guardian

diff --git a/guardian b/guardian
index acbd5453563001322d7f9ed44305784a40ec96bc..58a08195038eaf771b747b12b8e9cd8b4f603d60 100644 (file)
--- a/guardian
+++ b/guardian
@@ -382,6 +382,9 @@ sub Shutdown () {
        # Remove socket file on exit.
        &Guardian::Socket::RemoveSocketFile();
 
+       # Remove pid file on exit.
+       &Guardian::Daemon::RemovePIDFile();
+
        # Sleep for one second to give perl some
        # time to proper clean up everything before
        # exiting.