aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRutger Helling <rhelling@mykolab.com>2019-02-05 11:36:22 +0100
committerRutger Helling <rhelling@mykolab.com>2019-02-05 11:37:29 +0100
commit12a3abc6cc1757a413bdfa7a06d62ae0616b9a68 (patch)
treedddc72b12ee85152b1b78bfd00adcf9032d49b24
parentfd9a6d83c280593bd61805a78a9f45ced3e6a527 (diff)
downloadguix-12a3abc6cc1757a413bdfa7a06d62ae0616b9a68.tar
guix-12a3abc6cc1757a413bdfa7a06d62ae0616b9a68.tar.gz
gnu: retroarch: Fix wayland backend.
* gnu/packages/emulators.scm (retroarch): Fix wayland backend. [arguments]: Hard-code wayland-protocols. [native-inputs]: Add wayland-protocols.
-rw-r--r--gnu/packages/emulators.scm7
1 files changed, 6 insertions, 1 deletions
diff --git a/gnu/packages/emulators.scm b/gnu/packages/emulators.scm
index 5145c19f29..184a3bc859 100644
--- a/gnu/packages/emulators.scm
+++ b/gnu/packages/emulators.scm
@@ -1072,10 +1072,14 @@ emulation community. It provides highly accurate emulation.")
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(etc (string-append out "/etc"))
- (vulkan (assoc-ref inputs "vulkan-loader")))
+ (vulkan (assoc-ref inputs "vulkan-loader"))
+ (wayland-protocols (assoc-ref inputs "wayland-protocols")))
;; Hard-code the path to libvulkan.so.
(substitute* "gfx/common/vulkan_common.c"
(("libvulkan.so") (string-append vulkan "/lib/libvulkan.so")))
+ (substitute* "gfx/common/wayland/generate_wayland_protos.sh"
+ (("/usr/local/share/wayland-protocols")
+ (string-append wayland-protocols "/share/wayland-protocols")))
(substitute* "qb/qb.libs.sh"
(("/bin/true") (which "true")))
;; Use shared zlib.
@@ -1114,6 +1118,7 @@ emulation community. It provides highly accurate emulation.")
("zlib" ,zlib)))
(native-inputs
`(("pkg-config" ,pkg-config)
+ ("wayland-protocols" ,wayland-protocols)
("which" ,which)))
(home-page "https://www.libretro.com/")
(synopsis "Reference frontend for the libretro API")