[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/02: gnu: wine64-staging: Enable Vulkan support.
From: |
Rutger Helling |
Subject: |
02/02: gnu: wine64-staging: Enable Vulkan support. |
Date: |
Wed, 31 Jan 2018 03:42:17 -0500 (EST) |
rhelling pushed a commit to branch core-updates
in repository guix.
commit ee5402bfce1aa7ffbe9d27ed6b1fe54c2202a4bb
Author: Rutger Helling <address@hidden>
Date: Wed Jan 31 09:35:19 2018 +0100
gnu: wine64-staging: Enable Vulkan support.
* gnu/packages/wine.scm (wine64-staging)[arguments]: Add
'hardcode-libvulkan-path phase.
---
gnu/packages/wine.scm | 8 ++++++++
1 file changed, 8 insertions(+)
diff --git a/gnu/packages/wine.scm b/gnu/packages/wine.scm
index 51e0600..e71538f 100644
--- a/gnu/packages/wine.scm
+++ b/gnu/packages/wine.scm
@@ -281,6 +281,14 @@ integrated into the main branch.")
(string-append "libdir=" %output "/lib/wine64"))
#:phases
(modify-phases %standard-phases
+ (add-before 'configure 'hardcore-libvulkan-path
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let* ((libvulkan (string-append (assoc-ref %build-inputs
+ "vulkan-icd-loader") "/lib/libvulkan.so")))
+ ;; Hard-code the path to libvulkan.so.
+ (substitute* "dlls/vulkan/vulkan_thunks.c" (("libvulkan.so")
+ libvulkan))
+ #t)))
(add-after 'install 'copy-wine32-binaries
(lambda* (#:key outputs #:allow-other-keys)
(let* ((wine32 (assoc-ref %build-inputs "wine-staging"))