fixed some stuff

guix/system/home-desktop.scm

@@ -64,12 +64,14 @@
                          pulseaudio)
                    %base-packages))
 
- (services
-  (append (modify-services %desktop-services
-                           (delete gdm-service-type))
-          (list (service sddm-service-type
-                         (sddm-configuration
-                          (display-server "wayland"))))))
+
+;; (services (cons* ...
+;;                  (modify-services %desktop-services
+;;                    (gdm-service-type config
+;;                      =;;putabrackethere (gdm-configuration
+;;                          (inherit config)
+;;                          (wayland? #t)
+;;                          (debug? #t))))))
  (bootloader
   (bootloader-configuration
    (bootloader grub-efi-bootloader)
@@ -92,21 +94,3 @@
           (device (uuid "1C3B-10F5" 'fat32))
           (type "vfat"))
          %base-file-systems)))
-
-;; (setuid-programs
-;;    (let ((from (lambda (package file)
-;; 		 (setuid-program (program (file-append package file))))))
-;;      (cons* (from light "/bin/light")
-;; 	    (from mtr "/sbin/mtr")
-;; 	    (from network-manager "/bin/nmtui")
-;; 	    (from nfs-utils "/sbin/mount.nfs")
-;; 	    (from swaylock "/bin/swaylock")
-;; 	    %setuid-programs)))
-
-;; (services (cons* ...
-;;                  (modify-services %desktop-services
-;;                    (gdm-service-type config
-;;                      =;;putabrackethere (gdm-configuration
-;;                          (inherit config)
-;;                          (wayland? #t)
-;;                          (debug? #t))))))