diff --git a/gnu/packages/gl.scm b/gnu/packages/gl.scm index db02d798f54f130d528e4c990cdf13aff4747fa8..dc9f35c7b4e12f1afafb3fc9c8c09805fb699407 100644 --- a/gnu/packages/gl.scm +++ b/gnu/packages/gl.scm @@ -55,7 +55,8 @@ (define-module (gnu packages gl) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) #:use-module (guix utils) - #:use-module (ice-9 match)) + #:use-module (ice-9 match) + #:use-module (srfi srfi-1)) (define-public glu (package @@ -211,7 +212,8 @@ (define libva-without-mesa (package (inherit libva) (name "libva-without-mesa") - (inputs (alist-delete "mesa" (package-inputs libva))) + (inputs `(,@(fold alist-delete (package-inputs libva) + '("mesa" "wayland")))) (arguments (strip-keyword-arguments '(#:make-flags) diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm index 58fd35558c435067e9ac7769bd50a9e3fea6095f..94b51fcbcc726f0c4fb0aecee15892e01b7f7faa 100644 --- a/gnu/packages/video.scm +++ b/gnu/packages/video.scm @@ -564,7 +564,8 @@ (define-public libva ("libx11" ,libx11) ("libxext" ,libxext) ("libxfixes" ,libxfixes) - ("mesa" ,mesa))) + ("mesa" ,mesa) + ("wayland" ,wayland))) (arguments `(#:phases (modify-phases %standard-phases