summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-03-07 18:25:58 +0000
committerThierry Vignaud <tv@mageia.org>2012-03-07 18:25:58 +0000
commit28cd3f2daef2daa0166c2d656030435945f4d04b (patch)
tree157601a5d15d9c869824d32f8d3bfaf93d7861f5 /perl-install
parent029ee7025bc6816502a2546da65bbbd93d4c7832 (diff)
downloaddrakx-28cd3f2daef2daa0166c2d656030435945f4d04b.tar
drakx-28cd3f2daef2daa0166c2d656030435945f4d04b.tar.gz
drakx-28cd3f2daef2daa0166c2d656030435945f4d04b.tar.bz2
drakx-28cd3f2daef2daa0166c2d656030435945f4d04b.tar.xz
drakx-28cd3f2daef2daa0166c2d656030435945f4d04b.zip
(_set_service) perl_checker cleanups
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/services.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/services.pm b/perl-install/services.pm
index a2b8e5139..203e4154b 100644
--- a/perl-install/services.pm
+++ b/perl-install/services.pm
@@ -295,12 +295,12 @@ sub ask {
sub _set_service {
my ($service, $enable) = @_;
- if ( -f "/lib/systemd/system/$service.service" ) {
- if ( -l "/lib/systemd/system/$service.service" ) {
- $service = basename(readlink("/lib/systemd/system/$service.service"))
+ if (-f "/lib/systemd/system/$service.service") {
+ if (-l "/lib/systemd/system/$service.service") {
+ $service = basename(readlink("/lib/systemd/system/$service.service"));
}
else {
- $service = $service . ".service" ;
+ $service = $service . ".service";
}
run_program::rooted($::prefix, "systemctl", $enable ? "enable" : "disable", $service);
}