cristiancmoises
/
radix
mirror of https://codeberg.org/anemofilia/radix.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

packages: video: Use modify-inputs to specify the propagated inputs of mpv-minimal/x11 and mpv-minimal-wayland

pull/3/head
Luis Guilherme Coelho 2024-07-07 14:58:43 -03:00
parent 175abb1273
commit ea7e518cb2
No known key found for this signature in database
GPG Key ID: 1F2E76ACE3F531C8
1 changed files with 23 additions and 30 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

53
radix/packages/video.scm
View File

@ -1,5 +1,4 @@
(define-module (radix packages video) (define-module (radix packages video)
#:use-module (ice-9 match)
#:use-module (guix gexp) #:use-module (guix gexp)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix utils) #:use-module (guix utils)
@ -14,18 +13,15 @@
#~(list "-Dlibmpv=true" #~(list "-Dlibmpv=true"
"-Dbuild-date=false")))) "-Dbuild-date=false"))))
(propagated-inputs (propagated-inputs
(filter (match-lambda (modify-inputs (package-propagated-inputs mpv)
((package-name _) (delete "jack")
(not (member package-name (delete "libbluray")
`("jack" (delete "libcdio-paranoia")
"libbluray" (delete "libdvdnav")
"libcdio-paranoia" (delete "wayland")
"libdvdnav" (delete "wayland-protocols")
"wayland" (delete "libdvdread")
"wayland-protocols" (delete "pulseaudio")))
"libdvdread"
"pulseaudio")))))
(package-propagated-inputs mpv)))
(synopsis "Audio and video player") (synopsis "Audio and video player")
(description "This package provides a minimal build of mpv, the (description "This package provides a minimal build of mpv, the
general-purpose audio and video player, for X11."))) general-purpose audio and video player, for X11.")))
@ -39,23 +35,20 @@ general-purpose audio and video player, for X11.")))
#~(list "-Dlibmpv=true" #~(list "-Dlibmpv=true"
"-Dbuild-date=false")))) "-Dbuild-date=false"))))
(propagated-inputs (propagated-inputs
(filter (match-lambda (modify-inputs (package-propagated-inputs mpv)
((package-name _) (delete "jack")
(not (member package-name (delete "libbluray")
`("jack" (delete "libcdio-paranoia")
"libbluray" (delete "libdvdnav")
"libcdio-paranoia" (delete "libdvdread")
"libdvdnav" (delete "libext")
"libdvdread" (delete "libx11")
"libext" (delete "libxinerama")
"libx11" (delete "libxpresent")
"libxinerama" (delete "libxrandr")
"libxpresent" (delete "libxscrnsaver")
"libxrandr" (delete "libxv")
"libxscrnsaver" (delete "pulseaudio")))
"libxv"
"pulseaudio")))))
(package-propagated-inputs mpv)))
(synopsis "Audio and video player") (synopsis "Audio and video player")
(description "This package provides a minimal build of mpv, the (description "This package provides a minimal build of mpv, the
general-purpose audio and video player, for wayland."))) general-purpose audio and video player, for wayland.")))