Subject: [PATCH v2] added prefix to the wrapping of XDG_DATA_DIRS for evolution

From: Martin Becze <[email-masked]>
Date: Fri, 6 Sep 2019 06:35:34 -0400

---

 gnu/packages/gnome.scm | 19 ++++++++++---------
 1 file changed, 10 insertions(+), 9 deletions(-)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 1a091de938..ef6d78bb5a 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -8105,19 +8105,20 @@ generic enough to work for everyone.")
        #:phases
        (modify-phases %standard-phases
          (add-after
-          'install 'wrap-program
-          (lambda* (#:key inputs outputs #:allow-other-keys)
-           (let ((out (assoc-ref outputs "out")))
-             (wrap-program (string-append out "/bin/evolution")
-                `("GSETTINGS_SCHEMA_DIR" = (,(string-append out "/share/glib-2.0/schemas/")))
-                `("XDG_DATA_DIRS" = (,(getenv "XDG_DATA_DIRS")))))
-           #t)))
+             'install 'wrap-program
+           (lambda* (#:key inputs outputs #:allow-other-keys)
+             (let ((out (assoc-ref outputs "out")))
+               (wrap-program (string-append out "/bin/evolution")
+                 `("XDG_DATA_DIRS" prefix (,(getenv "XDG_DATA_DIRS")))
+                 `("GSETTINGS_SCHEMA_DIR" =
+                   (,(string-append out "/share/glib-2.0/schemas/")))))
+             #t)))
        #:configure-flags
        (list "-DENABLE_PST_IMPORT=OFF"    ; libpst is not packaged
              "-DENABLE_LIBCRYPTUI=OFF"))) ; libcryptui hasn't seen a release
-                                          ; in four years and cannot be built.
+                                        ; in four years and cannot be built.
     (native-inputs
-     `(("glib" ,glib "bin")               ; glib-mkenums
+     `(("glib" ,glib "bin")             ; glib-mkenums
        ("pkg-config" ,pkg-config)
        ("intltool" ,intltool)
        ("itstool" ,itstool)))
-- 
2.23.0