~ruther/guix-local: gnu: icecat-minimal: Fix dependency to libcanberra.

ed27cf313acce22dcaef945d170be84d1dbf3040 — Clément Lassieur 2 years ago 7b0863f

gnu: icecat-minimal: Fix dependency to libcanberra.

* gnu/packages/gnuzilla.scm (icecat-minimal)[arguments]: Add
'libcanberra/lib/gtk-3.0/modules' to LD_LIBRARY_PATH in the 'wrap-program'
phase.

This fixes these messages on Icecat startup:

Gtk-Message: 13:05:56.635: Failed to load module "canberra-gtk-module"
Gtk-Message: 13:05:56.636: Failed to load module "canberra-gtk-module"

Change-Id: I508dbf0a8133634c329c4c1ff20088752311ff91

patch browse .tar.gz .zip

1 files changed, 16 insertions(+), 12 deletions(-)

M gnu/packages/gnuzilla.scm

M gnu/packages/gnuzilla.scm => gnu/packages/gnuzilla.scm +16 -12

@@ 1091,18 1091,22 @@ variable defined below.  It requires guile-json to be installed."
               (let* ((lib (string-append #$output "/lib"))
                      (gtk #$(this-package-input "gtk+"))
                      (gtk-share (string-append gtk "/share"))
-                     (ld-libs '#$(map (lambda (label)
-                                        (file-append (this-package-input label) "/lib"))
-                                      '("libpng-apng"
-                                        "libxscrnsaver"
-                                        "mesa"
-                                        "pciutils"
-                                        "mit-krb5"
-                                        "eudev"
-                                        "pulseaudio"
-                                        ;; For the integration of native notifications
-                                        ;; (same reason as icedove)
-                                        "libnotify"))))
+                     (ld-libs '#$(cons
+                                  (file-append
+                                   (this-package-input "libcanberra")
+                                   "/lib/gtk-3.0/modules")
+                                  (map (lambda (label)
+                                         (file-append (this-package-input label) "/lib"))
+                                       '("libpng-apng"
+                                         "libxscrnsaver"
+                                         "mesa"
+                                         "pciutils"
+                                         "mit-krb5"
+                                         "eudev"
+                                         "pulseaudio"
+                                         ;; For the integration of native notifications
+                                         ;; (same reason as icedove)
+                                         "libnotify")))))
                 (wrap-program (car (find-files lib "^icecat$"))
                   `("XDG_DATA_DIRS" prefix (,gtk-share))
                   ;; The following line is commented out because the icecat