03/06: gnu: alsa-scarlett-gui: Wrap with GSETTINGS_SCHEMA_DIR.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 5d81aa8613e7f9e348ccc9fd83c25d75a900ba37
Author: Robby Zambito <contact@robbyzambito.me>
AuthorDate: Mon Jan 29 10:10:14 2024 -0500

    gnu: alsa-scarlett-gui: Wrap with GSETTINGS_SCHEMA_DIR.
    
    * gnu/packages/music.scm (alsa-scarlett-gui)[arguments]: Wrap with
    GSETTINGS_SCHEMA_DIR.
    
    Signed-off-by: Ludovic Courtès <ludo@gnu.org>
---
 gnu/packages/music.scm | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm
index 6b218376b7..d6fadf2247 100644
--- a/gnu/packages/music.scm
+++ b/gnu/packages/music.scm
@@ -233,6 +233,14 @@
                  (string-append "      "
                                 #$(cc-for-target) " -o")))
               (chdir "src")))
+          (add-after 'install 'wrap-program
+            (lambda* (#:key inputs outputs #:allow-other-keys)
+              (wrap-program (string-append (assoc-ref outputs "out")
+                                           "/bin/alsa-scarlett-gui")
+                ;; For GtkFileChooserDialog.
+                `("GSETTINGS_SCHEMA_DIR" =
+                  (,(string-append (assoc-ref inputs "gtk")
+                                   "/share/glib-2.0/schemas"))))))
           (delete 'configure))))
     (inputs
      (list alsa-lib glib gtk))