From 48d671fb199596465520ff9ba0136f9ecdb8326a Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Wed, 3 Aug 2016 17:09:08 -0400
Subject: SDDM wants to get the real session name

instead of symbolic Name
LXDE/WindowMaker will need exceptions too
---
 perl-install/any.pm | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/perl-install/any.pm b/perl-install/any.pm
index 4615f2b74..d0e63cf03 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -666,6 +666,15 @@ sub setupBootloader__grub2 {
     }
 }
 
+sub adapt_desktop_for_plasma {
+    my ($desktop) = @_;
+    my %h = (
+	'Plasma' => '01plasma',
+	'GNOMEClassic' => 'gnome-classic',
+    );
+    $h{$desktop} ? $h{$desktop} . '.desktop' : lc("${desktop}.desktop");
+}
+
 sub get_autologin() {
     my %desktop = getVarsFromSh("$::prefix/etc/sysconfig/desktop");
     my $gdm_file = "$::prefix/etc/X11/gdm/custom.conf";
@@ -728,7 +737,7 @@ sub set_autologin {
     #- Configure SDDM
     my $sddm_conffile = "$::prefix/etc/sddm.conf";
     eval { common::update_gnomekderc_no_create($sddm_conffile, 'Autologin' => (
-	Session => $autologin->{desktop},
+	Session => adapt_desktop_for_plasma($autologin->{desktop}),
 	User => $autologin->{user},
     )) } if -e $sddm_conffile;
 
-- 
cgit v1.2.1