summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/NEWS2
-rw-r--r--perl-install/services.pm2
2 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index a78f8968b..3905e08f5 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,5 @@
+- add --plain to systemctl list-units, else it adds some characters at
+ the beginning of the line since systemd 246 (mga#27046)
- recognize new kernel 5.5 - 5.7 drivers
Version 18.32 - 27 June 2020
diff --git a/perl-install/services.pm b/perl-install/services.pm
index 29593c9b2..1aab437a1 100644
--- a/perl-install/services.pm
+++ b/perl-install/services.pm
@@ -367,7 +367,7 @@ sub _systemd_services() {
# Running system using systemd
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);
+ my @opts = $::isInstall ? 'list-unit-files' : qw(--all --plain list-units);
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;