summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorColin Guthrie <colin@mageia.org>2012-04-24 20:10:43 +0000
committerColin Guthrie <colin@mageia.org>2012-04-24 20:10:43 +0000
commitef3fec41ae10bd26b95228a601ea56e233c11eda (patch)
tree66cdf1a6519c70d1eb67d31558aeba22fa8cf2aa
parent96fa3069e6fa08fb782d624263605b185c4556ed (diff)
downloaddrakx-backup-do-not-use-ef3fec41ae10bd26b95228a601ea56e233c11eda.tar
drakx-backup-do-not-use-ef3fec41ae10bd26b95228a601ea56e233c11eda.tar.gz
drakx-backup-do-not-use-ef3fec41ae10bd26b95228a601ea56e233c11eda.tar.bz2
drakx-backup-do-not-use-ef3fec41ae10bd26b95228a601ea56e233c11eda.tar.xz
drakx-backup-do-not-use-ef3fec41ae10bd26b95228a601ea56e233c11eda.zip
services: Check for systemd unit when determining if a service exists.
This could be made more complex, but it'll do for now.
-rw-r--r--perl-install/services.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/services.pm b/perl-install/services.pm
index f6989806b..f852fe573 100644
--- a/perl-install/services.pm
+++ b/perl-install/services.pm
@@ -405,7 +405,7 @@ sub services() {
sub service_exists {
my ($service) = @_;
- -x "$::prefix/etc/rc.d/init.d/$service";
+ -x "$::prefix/etc/rc.d/init.d/$service" or -e "$::prefix/lib/systemd/system/$service.service" or -l "$::prefix/lib/systemd/system/$service.service";
}
sub restart ($) {