diff options
| author | Rutger Helling <rhelling@mykolab.com> | 2019-02-05 11:36:22 +0100 |
|---|---|---|
| committer | Rutger Helling <rhelling@mykolab.com> | 2019-02-05 11:37:29 +0100 |
| commit | 12a3abc6cc1757a413bdfa7a06d62ae0616b9a68 (patch) | |
| tree | dddc72b12ee85152b1b78bfd00adcf9032d49b24 | |
| parent | fd9a6d83c280593bd61805a78a9f45ced3e6a527 (diff) | |
| download | guix-12a3abc6cc1757a413bdfa7a06d62ae0616b9a68.tar.gz guix-12a3abc6cc1757a413bdfa7a06d62ae0616b9a68.zip | |
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.scm | 7 |
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") |