ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-01 09:02:59 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: mpv: Update to 0.34.0.

Browse source 
* gnu/packages/video.scm (mpv): Update to 0.34.0.
[inputs]: Remove youtube-dl; add yt-dlp.
[arguments]: Adjust custom 'patch-paths phase to adjust for change in
inputs.
This commit is contained in:
Efraim Flashner 2021-11-02 11:12:45 +02:00
parent 5e8b18dbb1
commit e5a3df7b9f
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
1 changed files with 9 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

21
gnu/packages/video.scm
View file

@ -2084,7 +2084,7 @@ (define-public mplayer
(define-public mpv (define-public mpv
(package (package
(name "mpv") (name "mpv")
(version "0.33.1") (version "0.34.0")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
@ -2092,8 +2092,7 @@ (define-public mpv
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32 "0kqckrgvpx42gdmnc644lpwbimwf1am256xd670w2b8sbrjv3bm9"))))
"06rw1f55zcsj78ql8w70j9ljp2qb1pv594xj7q9cmq7i92a7hq45"))))
(build-system waf-build-system) (build-system waf-build-system)
(native-inputs (native-inputs
`(("perl" ,perl) ; for zsh completion file `(("perl" ,perl) ; for zsh completion file
@ -2137,19 +2136,17 @@ (define-public mpv
("wayland" ,wayland) ("wayland" ,wayland)
("wayland-protocols" ,wayland-protocols) ("wayland-protocols" ,wayland-protocols)
("libxkbcommon" ,libxkbcommon) ("libxkbcommon" ,libxkbcommon)
("youtube-dl" ,youtube-dl) ("yt-dlp" ,yt-dlp)
("zlib" ,zlib))) ("zlib" ,zlib)))
(arguments (arguments
'(#:phases '(#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after (add-after 'unpack 'patch-paths
'unpack 'patch-paths (lambda* (#:key inputs #:allow-other-keys)
(lambda* (#:key inputs #:allow-other-keys) (let ((ytdl (assoc-ref inputs "yt-dlp")))
(let ((ytdl (assoc-ref inputs "youtube-dl"))) (substitute* "player/lua/ytdl_hook.lua"
(substitute* "player/lua/ytdl_hook.lua" (("\"yt-dlp\",")
(("\"youtube-dl\",") (string-append "\"" ytdl "/bin/yt-dlp\","))))))
(string-append "\"" ytdl "/bin/youtube-dl\",")))
#t)))
(add-before 'configure 'build-reproducibly (add-before 'configure 'build-reproducibly
(lambda _ (lambda _
;; Somewhere in the build system library dependencies are enumerated ;; Somewhere in the build system library dependencies are enumerated