From 63aa10c1a70fbfa9384e8e1cc88a59df080b021e Mon Sep 17 00:00:00 2001
From: Martin Whitaker <mageia@martin-whitaker.me.uk>
Date: Sun, 25 Nov 2018 09:44:55 +0000
Subject: Check DM really is installed, not just present in
 /usr/share/X11.dm.d.

The gdm.conf file is in the xinitrc package, so we can't rely on that
to determine whether GDM is available. Even if we fix that, this makes
our test more robust.
---
 perl-install/any.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/any.pm')

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;
 }
-- 
cgit v1.2.1