diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-06-03 16:44:32 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-06-03 16:44:32 +0000 |
| commit | 4a2e53461531395369b5e9e7bcae26e154143799 (patch) | |
| tree | 55091e9d9a62c26053eb0df0d6e665579a1c55dc /perl-install | |
| parent | 161ad139e0cbfcd456b549dc332c3ec951b748cf (diff) | |
| download | drakx-4a2e53461531395369b5e9e7bcae26e154143799.tar drakx-4a2e53461531395369b5e9e7bcae26e154143799.tar.gz drakx-4a2e53461531395369b5e9e7bcae26e154143799.tar.bz2 drakx-4a2e53461531395369b5e9e7bcae26e154143799.tar.xz drakx-4a2e53461531395369b5e9e7bcae26e154143799.zip | |
(systemd_unit_exists) explain why we use -l
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/services.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/services.pm b/perl-install/services.pm index cef49bb5a..6927b71b8 100644 --- a/perl-install/services.pm +++ b/perl-install/services.pm @@ -468,6 +468,7 @@ sub services() { sub systemd_unit_exists { my ($name) = @_; + # we test with -l as symlinks are not valid when the system is chrooted: -e "$::prefix/lib/systemd/system/$name.service" or -l "$::prefix/lib/systemd/system/$name.service"; } |