Archived
1
0
Fork 0

gnu: youtube-dl: Update to 2021.12.17.

* gnu/packages/video.scm (youtube-dl): Update to 2021.12.17.
[source, arguments]: Don't explicitly return #t from snippet or phases.
This commit is contained in:
Tobias Geerinckx-Rice 2022-01-07 02:55:30 +01:00
parent 046322189b
commit 386eeb04fa
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79

View file

@ -2332,14 +2332,14 @@ To load this plugin, specify the following option when starting mpv:
(define-public youtube-dl (define-public youtube-dl
(package (package
(name "youtube-dl") (name "youtube-dl")
(version "2021.06.06") (version "2021.12.17")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "https://youtube-dl.org/downloads/latest/" (uri (string-append "https://youtube-dl.org/downloads/latest/"
"youtube-dl-" version ".tar.gz")) "youtube-dl-" version ".tar.gz"))
(sha256 (sha256
(base32 (base32
"1hqan9h55x9gfdakw554vic68w9gpvhblchwxlw265zxp56hxjrw")) "1prm84ci1n1kjzhikhrsbxbgziw6br822psjnijm2ibqnz49jfwz"))
(snippet (snippet
'(begin '(begin
;; Delete the pre-generated files, except for the man page ;; Delete the pre-generated files, except for the man page
@ -2349,8 +2349,7 @@ To load this plugin, specify the following option when starting mpv:
;;"youtube-dl.1" ;;"youtube-dl.1"
"youtube-dl.bash-completion" "youtube-dl.bash-completion"
"youtube-dl.fish" "youtube-dl.fish"
"youtube-dl.zsh")) "youtube-dl.zsh"))))))
#t))))
(build-system python-build-system) (build-system python-build-system)
(arguments (arguments
;; The problem here is that the directory for the man page and completion ;; The problem here is that the directory for the man page and completion
@ -2369,8 +2368,7 @@ To load this plugin, specify the following option when starting mpv:
;; Continue respecting the --ffmpeg-location argument. ;; Continue respecting the --ffmpeg-location argument.
(substitute* "youtube_dl/postprocessor/ffmpeg.py" (substitute* "youtube_dl/postprocessor/ffmpeg.py"
(("\\.get\\('ffmpeg_location'\\)" match) (("\\.get\\('ffmpeg_location'\\)" match)
(format #f "~a or '~a'" match (which "ffmpeg")))) (format #f "~a or '~a'" match (which "ffmpeg"))))))
#t))
(add-before 'build 'build-generated-files (add-before 'build 'build-generated-files
(lambda _ (lambda _
;; Avoid the make targets that require pandoc. ;; Avoid the make targets that require pandoc.
@ -2393,8 +2391,7 @@ To load this plugin, specify the following option when starting mpv:
(("'etc/") (("'etc/")
(string-append "'" prefix "/etc/")) (string-append "'" prefix "/etc/"))
(("'share/") (("'share/")
(string-append "'" prefix "/share/"))) (string-append "'" prefix "/share/"))))))
#t)))
(add-after 'install 'install-completion (add-after 'install 'install-completion
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
@ -2402,8 +2399,7 @@ To load this plugin, specify the following option when starting mpv:
"/share/zsh/site-functions"))) "/share/zsh/site-functions")))
(mkdir-p zsh) (mkdir-p zsh)
(copy-file "youtube-dl.zsh" (copy-file "youtube-dl.zsh"
(string-append zsh "/_youtube-dl")) (string-append zsh "/_youtube-dl"))))))))
#t))))))
(native-inputs (native-inputs
(list zip)) (list zip))
(inputs (inputs