[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
08/11: gnu: mpv: Use G-expressions.
From: |
guix-commits |
Subject: |
08/11: gnu: mpv: Use G-expressions. |
Date: |
Wed, 26 Oct 2022 17:11:00 -0400 (EDT) |
nckx pushed a commit to branch master
in repository guix.
commit 9eea2db6aeb73a2f81d12a1334e200aa560ef5e2
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Sun Oct 16 02:00:01 2022 +0200
gnu: mpv: Use G-expressions.
* gnu/packages/video.scm (mpv)[arguments]:
Rewrite as G-expressions.
---
gnu/packages/video.scm | 52 ++++++++++++++++++++++++++------------------------
1 file changed, 27 insertions(+), 25 deletions(-)
diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm
index a9c1debc08..522894ec44 100644
--- a/gnu/packages/video.scm
+++ b/gnu/packages/video.scm
@@ -2169,31 +2169,33 @@ SVCD, DVD, 3ivx, DivX 3/4/5, WMV and H.264 movies.")
(base32
"12qxwm1ww5vhjddl8yvj1xa0n1fi9z3lmzwhaiday2v59ca0qgsk"))))
(build-system waf-build-system)
(arguments
- '(#:phases
- (modify-phases %standard-phases
- (add-after 'unpack 'patch-paths
- (lambda* (#:key inputs #:allow-other-keys)
- (substitute* "player/lua/ytdl_hook.lua"
- (("\"yt-dlp\",")
- (string-append
- "\"" (search-input-file inputs "bin/yt-dlp") "\",")))))
- (add-before 'configure 'build-reproducibly
- (lambda _
- ;; Somewhere in the build system library dependencies are
enumerated
- ;; and passed as linker flags, but the order in which they are
added
- ;; varies. See <https://github.com/mpv-player/mpv/issues/7855>.
- ;; Set PYTHONHASHSEED as a workaround for deterministic results.
- (setenv "PYTHONHASHSEED" "1")))
- (add-before 'configure 'set-up-waf
- (lambda* (#:key inputs #:allow-other-keys)
- (copy-file (search-input-file inputs "/bin/waf") "waf")
- (setenv "CC" "gcc"))))
- #:configure-flags (list "--enable-libmpv-shared"
- "--enable-cdda"
- "--enable-dvdnav"
- "--disable-build-date")
- ;; No check function defined.
- #:tests? #f))
+ (list
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'unpack 'patch-file-names
+ (lambda* (#:key inputs #:allow-other-keys)
+ (substitute* "player/lua/ytdl_hook.lua"
+ (("\"yt-dlp\",")
+ (string-append
+ "\"" (search-input-file inputs "bin/yt-dlp") "\",")))))
+ (add-before 'configure 'build-reproducibly
+ (lambda _
+ ;; Somewhere in the build system library dependencies are
enumerated
+ ;; and passed as linker flags, but the order in which they are
added
+ ;; varies. See <https://github.com/mpv-player/mpv/issues/7855>.
+ ;; Set PYTHONHASHSEED as a workaround for deterministic results.
+ (setenv "PYTHONHASHSEED" "1")))
+ (add-before 'configure 'set-up-waf
+ (lambda* (#:key inputs #:allow-other-keys)
+ (copy-file (search-input-file inputs "bin/waf") "waf")
+ (setenv "CC" "gcc"))))
+ #:configure-flags
+ #~(list "--enable-libmpv-shared"
+ "--enable-cdda"
+ "--enable-dvdnav"
+ "--disable-build-date")
+ ;; No check function defined.
+ #:tests? #f))
(native-inputs
(list perl ; for zsh completion file
pkg-config python-docutils))
- branch master updated (c07b55eb94 -> 5dda4c69f0), guix-commits, 2022/10/26
- 02/11: gnu: memtest86+: Update to 6.00., guix-commits, 2022/10/26
- 06/11: gnu: mpv: Remove trailing #t from phases., guix-commits, 2022/10/26
- 09/11: gnu: mpv: Prepare for cross-compilation., guix-commits, 2022/10/26
- 08/11: gnu: mpv: Use G-expressions.,
guix-commits <=
- 10/11: gnu: sudo: Update to 1.9.12., guix-commits, 2022/10/26
- 05/11: system: Support bare-bones serial console., guix-commits, 2022/10/26
- 01/11: gnu: mu: Update to 1.8.11., guix-commits, 2022/10/26
- 03/11: gnu: memtest86+: Use G-expressions., guix-commits, 2022/10/26
- 04/11: gnu: memtest86+: Include a GRUB-based ISO image., guix-commits, 2022/10/26
- 07/11: gnu: mpv: Remove input labels., guix-commits, 2022/10/26
- 11/11: gnu: xorriso: Update to 1.5.4., guix-commits, 2022/10/26