From b86e6150e694517213467045139b1badbdba5552 Mon Sep 17 00:00:00 2001
From: Martin Whitaker <mageia@martin-whitaker.me.uk>
Date: Sun, 7 Jan 2018 21:25:05 +0000
Subject: Remove leftover debug message.

---
 perl-install/services.pm | 1 -
 1 file changed, 1 deletion(-)

diff --git a/perl-install/services.pm b/perl-install/services.pm
index e77d07511..f76b29b86 100644
--- a/perl-install/services.pm
+++ b/perl-install/services.pm
@@ -368,7 +368,6 @@ sub _systemd_services() {
     log::explanations("Detected systemd running. Using systemctl introspection.");
     # even if systemd is not running, we can detect status of shorewell service which is not wanted by:
     my @opts = $::isInstall ? 'list-unit-files' : qw(--all list-units);
-    print "chroot $::prefix /bin/systemctl --no-legend --no-pager --full @opts";
     foreach (run_program::rooted_get_stdout($::prefix, '/bin/systemctl', '--no-legend', '--no-pager', '--full', @opts)) {
         my ($name) = m!^(\S+)\.service\s+loaded!;
         ($name) = m!^(\S+)\.service\s+enabled! if $::isInstall && !$name;
-- 
cgit v1.2.1