02/05: gnu: gnome: Remove '--disable-acceleration-check' flag from 'gnome.desktop'.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 44a06c942c36b75c8aab9761891ca64c1f4ac367
Author: Ludovic Courtès <address@hidden>
Date:   Sun Feb 10 15:32:58 2019 +0100

    gnu: gnome: Remove '--disable-acceleration-check' flag from 'gnome.desktop'.
    
    With this change the GNOME session is now listed in the log-in screen of
    GDM.
    
    * gnu/packages/gnome.scm (gnome-session)[arguments]: Remove
    'disable-hardware-acceleration-check' phase.  That phase was apparently
    no longer needed.  Furthermore, GDM expects 'TryExec' to be a file name,
    not a file name followed by arguments; thus, the option led GDM to
    discard 'gnome.desktop' with "GdmSession: Command not found: TryExec".
---
 gnu/packages/gnome.scm | 12 +-----------
 1 file changed, 1 insertion(+), 11 deletions(-)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 850bfcf..db10b0a1 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -1,6 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2013, 2015 Andreas Enge <address@hidden>
-;;; Copyright © 2014, 2015, 2016, 2017, 2018 Ludovic Courtès <address@hidden>
+;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019 Ludovic Courtès 
<address@hidden>
 ;;; Copyright © 2014 Ian Denhardt <address@hidden>
 ;;; Copyright © 2014, 2016 Eric Bavier <address@hidden>
 ;;; Copyright © 2014, 2015 Federico Beffa <address@hidden>
@@ -4572,16 +4572,6 @@ such as gzip tarballs.")
                    (out  (assoc-ref outputs "out")))
                (wrap-program (string-append out "/bin/gnome-session")
                  `("PATH" ":" prefix (,(string-append glib "/bin"))))
-               #t)))
-         (add-after 'install 'disable-hardware-acceleration-check
-           (lambda* (#:key outputs #:allow-other-keys)
-             ;; Do not abort if hardware acceleration is missing.  This allows
-             ;; GNOME to run in QEMU and on low-end devices.
-             (let ((out (assoc-ref outputs "out")))
-               (substitute* (string-append out
-                                           "/share/xsessions/gnome.desktop")
-                 (("gnome-session")
-                  "gnome-session --disable-acceleration-check"))
                #t))))
 
        #:configure-flags