01/03: gnu: gnome-session: Make sure 'gsettings' is found.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit a0d7baaf483fb88d3f4896a8510b31123a26a646
Author: Ludovic Courtès <address@hidden>
Date:   Fri Mar 18 10:04:37 2016 +0100

    gnu: gnome-session: Make sure 'gsettings' is found.
    
    * gnu/packages/gnome.scm (gnome-session)[arguments]: Add
    'wrap-gnome-session' phase.
---
 gnu/packages/gnome.scm |   10 +++++++++-
 1 files changed, 9 insertions(+), 1 deletions(-)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 75a2a0c..b998cc3 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -3812,7 +3812,15 @@ such as gzip tarballs.")
                (("#ifdef HAVE_SYSTEMD") "#if 0"))
              (substitute* "gnome-session/gsm-manager.c"
                (("#ifdef HAVE_SYSTEMD") "#if 0"))
-             #t)))
+             #t))
+         (add-after 'install 'wrap-gnome-session
+           (lambda* (#:key inputs outputs #:allow-other-keys)
+             ;; Make sure 'gnome-session' finds the 'gsettings' program.
+             (let ((glib (assoc-ref inputs "glib:bin"))
+                   (out  (assoc-ref outputs "out")))
+               (wrap-program (string-append out "/bin/gnome-session")
+                 `("PATH" ":" prefix (,(string-append glib "/bin"))))
+               #t))))
        #:configure-flags
        '("--enable-elogind")))
     (build-system glib-or-gtk-build-system)