bug#36896: [PATCH] added gsettings-desktop-schema to progragated inputs

[Martin Becze <mjbecze@riseup.net>]

On 2019-09-03 11:59, Ricardo Wurmus wrote:
> Hi Martin,
> 
>>>> I sent a new patch in (using git sendemail) but it didn't thread quite
>>>> correctly.
>>>
>>> bumping! I have a few more evolution patches but need to get this one in
>>> first
>>
>> bumping!
> 
> Sorry for the delay!  Where can I find the new patch that you’ve sent?
> I don’t see it in your previous emails.

hmm maybe i did something wrong when sending with "git-sendemail" it
showed up here https://issues.guix.info/issue/36896
Anyways here is the patch! 

---
 gnu/packages/gnome.scm | 15 ++++++++++++++-
 1 file changed, 14 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index d5e46e09c1..1a091de938 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -39,6 +39,7 @@
 ;;; Copyright © 2019 Giacomo Leidi <goodoldpaul@autistici.org>
 ;;; Copyright © 2019 Jelle Licht <jlicht@fsfe.org>
 ;;; Copyright © 2019 Jonathan Frederickson <jonathan@terracrypt.net>
+;;; Copyright © 2019 Martin Becze <mjbecze@riseup.net>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -8100,7 +8101,18 @@ generic enough to work for everyone.")
                
"0sdv5lg2vlz5f4raymz9d8a5jq4j18vbqyigaip6508p3bjnfj8l"))))
     (build-system cmake-build-system)
     (arguments
-     `(#:configure-flags
+     `(
+       #: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)))
+       #: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.
@@ -8113,6 +8125,7 @@ generic enough to work for everyone.")
      `(("enchant" ,enchant)
        ("evolution-data-server" ,evolution-data-server) ; must be the
same version
        ("gcr" ,gcr)
+       ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
        ("gnome-autoar" ,gnome-autoar)
        ("gnome-desktop" ,gnome-desktop)
        ("gtkspell3" ,gtkspell3)
-- 
2.22.0