~ruther/guix-local: gnu: gnome-session: Make sure 'gsettings' is found.

a0d7baaf483fb88d3f4896a8510b31123a26a646 — Ludovic Courtès 10 years ago 3bf429a

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

* gnu/packages/gnome.scm (gnome-session)[arguments]: Add
'wrap-gnome-session' phase.

patch browse .tar.gz

1 files changed, 9 insertions(+), 1 deletions(-)

M gnu/packages/gnome.scm

M gnu/packages/gnome.scm => gnu/packages/gnome.scm +9 -1

@@ 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)