summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 8cd3ead4c..3da0a013a 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -760,7 +760,7 @@ sub available_dms() {
my @l;
foreach (glob("$::prefix/usr/share/X11/dm.d/*.conf")) {
my %dm = getVarsFromSh($_);
- push @l, $dm{EXEC} if $dm{EXEC};
+ push @l, $dm{EXEC} if $dm{EXEC} && -x "$::prefix/$dm{EXEC}";
}
@l;
}