From ad3e6a16635a64d63dd78cb6dc52068c30ff075d Mon Sep 17 00:00:00 2001
From: Daniel Nichter <daniel@percona.com>
Date: Fri, 14 Jun 2013 17:26:58 -0700
Subject: [PATCH] Stop all services when pt-agent stops due to signal.

---
 bin/pt-agent | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/bin/pt-agent b/bin/pt-agent
index 640aa37e..21b770ac 100755
--- a/bin/pt-agent
+++ b/bin/pt-agent
@@ -6028,6 +6028,10 @@ sub run_agent {
       );
    }
 
+   stop_all_services(
+      lib_dir => $lib_dir,
+   );
+
    # This shouldn't happen until the service is stopped/killed.
    $logger->info('Agent ' . $agent->name . ' has stopped');
    return;
@@ -7746,7 +7750,7 @@ sub stop_all_services {
       );
    };
    if ( $EVAL_ERROR ) {
-      $logger->warning("Error removing services from crontab: $EVAL_ERROR");
+      $logger->error("Error removing services from crontab: $EVAL_ERROR");
    }
 
    # Stop all real services by running their stop-<service> meta-service.