summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-06-03 16:44:32 +0000
committerThierry Vignaud <tv@mageia.org>2012-06-03 16:44:32 +0000
commit4a2e53461531395369b5e9e7bcae26e154143799 (patch)
tree55091e9d9a62c26053eb0df0d6e665579a1c55dc /perl-install
parent161ad139e0cbfcd456b549dc332c3ec951b748cf (diff)
downloaddrakx-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.pm1
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";
}