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 | 28cd3f2daef2daa0166c2d656030435945f4d04b (patch) | |
| tree | 157601a5d15d9c869824d32f8d3bfaf93d7861f5 /perl-install | |
| parent | 029ee7025bc6816502a2546da65bbbd93d4c7832 (diff) | |
| download | drakx-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.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); } |