aboutsummaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorKei Kebreau <kkebreau@posteo.net>2020-01-26 19:01:00 -0500
committerKei Kebreau <kkebreau@posteo.net>2020-01-26 19:12:22 -0500
commit1ef71f522577e8b796344e072463d87e5cbae889 (patch)
tree457b5863e80d9af609ecf5710239a74de8d9f4e7 /gnu
parent4144eb195c28cbfd1ca2a131cf4b64afcad713ae (diff)
downloadguix-1ef71f522577e8b796344e072463d87e5cbae889.tar.gz
guix-1ef71f522577e8b796344e072463d87e5cbae889.zip
gnu: pcsxr: Wrap with GSETTINGS_SCHEMA_DIR path variable.
Without setting this path variable, gtk+ must be installed in the user's profile for pcsxr's GUI to work. * gnu/packages/emulators.scm (pcsxr)[arguments]: Add 'wrap-program' phase and return #t from 'cd-subdir' and 'fix-cdio-lookup' phases.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/emulators.scm14
1 files changed, 12 insertions, 2 deletions
diff --git a/gnu/packages/emulators.scm b/gnu/packages/emulators.scm
index 140a8087ec..23b5ad864f 100644
--- a/gnu/packages/emulators.scm
+++ b/gnu/packages/emulators.scm
@@ -1478,12 +1478,22 @@ functions. The source code to MAME serves as this documentation.")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'cd-subdir
- (lambda _ (chdir "pcsxr")))
+ (lambda _ (chdir "pcsxr") #t))
(add-before 'configure 'fix-cdio-lookup
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "cmake/FindCdio.cmake"
(("/usr/include/cdio")
- (string-append (assoc-ref inputs "libcdio") "/include/cdio"))))))))
+ (string-append (assoc-ref inputs "libcdio") "/include/cdio")))
+ #t))
+ (add-after 'install 'wrap-program
+ (lambda* (#:key inputs outputs #:allow-other-keys)
+ (wrap-program (string-append (assoc-ref outputs "out")
+ "/bin/pcsxr")
+ ;; For GtkFileChooserDialog.
+ `("GSETTINGS_SCHEMA_DIR" =
+ (,(string-append (assoc-ref inputs "gtk+")
+ "/share/glib-2.0/schemas"))))
+ #t)))))
(native-inputs
`(("pkg-config" ,pkg-config)
("intltool" ,intltool)