02/06: gnu: mesa: Ungraft.

[guix-commits]

podiki pushed a commit to branch mesa-updates
in repository guix.

commit 5555f3f98e97f8bbcd6ce9bc6b76a6eb20566f55
Author: John Kehayias <john.kehayias@protonmail.com>
AuthorDate: Tue Jul 25 16:18:30 2023 -0400

    gnu: mesa: Ungraft.
    
    * gnu/packages/gl.scm (mesa)[configure-flags]: Add intel_hasvk and swrast to
    vulkan-drivers.
    [replacement]: Remove.
    (mesa-vulkan-hasvk): Remove variable.
---
 gnu/packages/gl.scm | 18 +-----------------
 1 file changed, 1 insertion(+), 17 deletions(-)

diff --git a/gnu/packages/gl.scm b/gnu/packages/gl.scm
index d42903cc8f..9325d41907 100644
--- a/gnu/packages/gl.scm
+++ b/gnu/packages/gl.scm
@@ -279,7 +279,6 @@ also known as DXTn or DXTC) for Mesa.")
          (base32
           "1mcjf41x2bhxs6yxars7nh2vfryfw50g6rvbcfbb1wqdv2jn4qrq"))))
     (build-system meson-build-system)
-    (replacement mesa-vulkan-hasvk)
     (propagated-inputs
      ;; The following are in the Requires.private field of gl.pc.
      (list libdrm
@@ -346,7 +345,7 @@ svga,swrast,virgl")))
          ;; Explicitly enable Vulkan on some architectures.
          #$@(match (%current-system)
              ((or "i686-linux" "x86_64-linux")
-              '("-Dvulkan-drivers=intel,amd"))
+              '("-Dvulkan-drivers=intel,intel_hasvk,amd,swrast"))
              ((or "powerpc64le-linux" "powerpc-linux")
               '("-Dvulkan-drivers=amd,swrast"))
              ("aarch64-linux"
@@ -528,21 +527,6 @@ device drivers allows Mesa to be used in many different 
environments ranging
 from software emulation to complete hardware acceleration for modern GPUs.")
     (license license:x11)))
 
-(define mesa-vulkan-hasvk
-  (let ((graft mesa)
-        (vulk "-Dvulkan-drivers=intel,amd"))
-    (package
-      (inherit graft)
-      (arguments
-        (substitute-keyword-arguments (package-arguments graft)
-          ((#:configure-flags flags)
-           #~(begin
-               (use-modules (ice-9 match))
-               (map (match-lambda
-                      (#$vulk (string-append #$vulk ",intel_hasvk,swrast"))
-                      (x x))
-                 #$flags))))))))
-
 (define-public mesa-opencl
   (package/inherit mesa
     (name "mesa-opencl")