summaryrefslogtreecommitdiffstats
path: root/perl-install/services.pm
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
commitb71ba30d3660471dcc3344f7158e2fd247bddf2a (patch)
tree157601a5d15d9c869824d32f8d3bfaf93d7861f5 /perl-install/services.pm
parent743415f2cf24cffc7dd8e68bf0d553818e36d3c9 (diff)
downloaddrakx-backup-do-not-use-b71ba30d3660471dcc3344f7158e2fd247bddf2a.tar
drakx-backup-do-not-use-b71ba30d3660471dcc3344f7158e2fd247bddf2a.tar.gz
drakx-backup-do-not-use-b71ba30d3660471dcc3344f7158e2fd247bddf2a.tar.bz2
drakx-backup-do-not-use-b71ba30d3660471dcc3344f7158e2fd247bddf2a.tar.xz
drakx-backup-do-not-use-b71ba30d3660471dcc3344f7158e2fd247bddf2a.zip
(_set_service) perl_checker cleanups
Diffstat (limited to 'perl-install/services.pm')
-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);
}