03/05: gnu: lollypop: Wrap with required path variables.

[guix-commits]

nckx pushed a commit to branch master
in repository guix.

commit 8ac8b3b3601560c4a455543435276a8cdf61b54e
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Sun Oct 27 00:43:12 2019 +0200

    gnu: lollypop: Wrap with required path variables.
    
    Fixes <https://issues.guix.info/issue/37937>.
    
    * gnu/packages/gnome.scm (lollypop)[arguments]: Rename ‘wrap’ phase to
    ‘wrap-python’ and add ‘wrap-glib-or-gtk’ phase.
    [inputs]: Add gsettings-desktop-schemas.
---
 gnu/packages/gnome.scm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 8bb891b..12993ea 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -7809,8 +7809,10 @@ views can be printed as PDF or PostScript files, or 
exported to HTML.")
                (wrap-program (string-append out "/bin/lollypop")
                  `("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path))))
              #t))
-         (add-after 'install 'wrap
-           (@@ (guix build python-build-system) wrap)))))
+         (add-after 'install 'wrap-python
+           (@@ (guix build python-build-system) wrap))
+         (add-after 'install 'wrap-glib-or-gtk
+           (@@ (guix build glib-or-gtk-build-system) wrap-all-programs)))))
     (native-inputs
      `(("intltool" ,intltool)
        ("itstool" ,itstool)
@@ -7819,6 +7821,7 @@ views can be printed as PDF or PostScript files, or 
exported to HTML.")
        ("pkg-config" ,pkg-config)))
     (inputs
      `(("gobject-introspection" ,gobject-introspection)
+       ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
        ("gst-plugins-base" ,gst-plugins-base)
        ("libnotify" ,libnotify)
        ("libsecret" ,libsecret)