me/guix
Archived
1
0
Fork 0
Code Activity

gnu: mpv-mpris: Switch to gnu-build-system.

Browse source 
* gnu/packages/video.scm (mpv-mpris)[build-system]: Use gnu-build-system again.
[arguments]<#:phases>: Run tests.
[native-inputs]: Add dbus, jq, playerctl, socat, sound-theme-freedesktop,
xorg-server-for-tests, xvfb-run.

Change-Id: I9de4ade633388ec42ac30019feb133ca98811ad9
Signed-off-by: Hilton Chain <hako@ultrarare.space>
This commit is contained in:
Josselin Poiret 2023-12-27 11:15:22 +01:00 • committed by Hilton Chain
parent 95c2de71a4
commit ee20e6fa2e
No known key found for this signature in database
GPG key ID: ACC66D09CA528292
1 changed files with 28 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

36
gnu/packages/video.scm
View file

@ -154,6 +154,7 @@
#:use-module (gnu packages image) #:use-module (gnu packages image)
#:use-module (gnu packages imagemagick) #:use-module (gnu packages imagemagick)
#:use-module (gnu packages iso-codes) #:use-module (gnu packages iso-codes)
#:use-module (gnu packages libcanberra)
#:use-module (gnu packages libidn) #:use-module (gnu packages libidn)
#:use-module (gnu packages libusb) #:use-module (gnu packages libusb)
#:use-module (gnu packages linux) #:use-module (gnu packages linux)
@ -2785,18 +2786,35 @@ images and image hosting sites.")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "1384y8n3l0xk8hbad1nsj9ljzb1h02g3ln3jysd8bd6shbl0x4mx")))) (base32 "1384y8n3l0xk8hbad1nsj9ljzb1h02g3ln3jysd8bd6shbl0x4mx"))))
(build-system copy-build-system) (build-system gnu-build-system)
(arguments (arguments
'(#:install-plan (list
'(("mpris.so" "lib/")) #:make-flags
#~(list (string-append "SCRIPTS_DIR=" #$output "/lib")
(string-append "CC=" #$(cc-for-target)))
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-before 'install 'build (delete 'configure)
(lambda _ (replace 'check
(setenv "CC" (which "gcc")) (lambda* (#:key inputs native-inputs tests? #:allow-other-keys)
(invoke "make")))))) (if tests?
(begin
(setenv
"MPV_MPRIS_TEST_PLAY"
(search-input-file
(or native-inputs inputs)
"share/sounds/freedesktop/stereo/alarm-clock-elapsed.oga"))
(invoke "make" "test"))
(format #t "test suite not run~%")))))))
(native-inputs (native-inputs
(list pkg-config)) (list dbus
jq
pkg-config
playerctl
socat
sound-theme-freedesktop
xorg-server-for-tests
xvfb-run))
(inputs (inputs
(list ffmpeg glib mpv)) (list ffmpeg glib mpv))
(home-page "https://github.com/hoyon/mpv-mpris") (home-page "https://github.com/hoyon/mpv-mpris")