diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-03-07 18:25:58 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-03-07 18:25:58 +0000 |
| commit | b71ba30d3660471dcc3344f7158e2fd247bddf2a (patch) | |
| tree | 157601a5d15d9c869824d32f8d3bfaf93d7861f5 /perl-install | |
| parent | 743415f2cf24cffc7dd8e68bf0d553818e36d3c9 (diff) | |
| download | drakx-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')
| -rw-r--r-- | perl-install/services.pm | 8 |
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); } |