amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: emacs-youtube-dl: Replace youtube-dl input by yt-dlp.

Browse source 
I haven't tested it, but it should work according to
https://github.com/skeeto/youtube-dl-emacs/issues/5

* gnu/packages/emacs-xyz.scm (emacs-youtube-dl)
[arguments]: Rewrite using gexps.
<#:phases>: Use search-input-file in phase 'configure.
[inputs]: Replace youtube-dl by yt-dlp.

Change-Id: I602ff221e7093aa8ff820d4e904f7510eea0ecbb
Signed-off-by: Sharlatan Hellseher <sharlatanus@gmail.com>
This commit is contained in:
Nicolas Graves 2025-08-12 13:58:10 +02:00 • committed by Sharlatan Hellseher
parent 753588606c
commit 5403d63b47
No known key found for this signature in database
GPG key ID: 76D727BFF62CD2B5
1 changed files with 19 additions and 21 deletions
Download patch file Download diff file Expand all files Collapse all files

20
gnu/packages/emacs-xyz.scm
View file

@ -32782,19 +32782,16 @@ statistics with the help of @code{tokei}.")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"0zkl9jkjbx0lmp9ylv4rqg1zwqibk053s4rp7s1h0i18nzk7vn8j"))))
(base32 "0zkl9jkjbx0lmp9ylv4rqg1zwqibk053s4rp7s1h0i18nzk7vn8j"))))
(build-system emacs-build-system)
(inputs
(list youtube-dl))
(arguments
`(#:tests? #f ; Error : standard input is not a tty
#:test-command (list "make" "simulate")
(list
#:tests? #f ; Error : standard input is not a tty
#:test-command #~(list "make" "simulate")
#:phases
(modify-phases %standard-phases
#~(modify-phases %standard-phases
(add-after 'unpack 'configure
(lambda* (#:key inputs #:allow-other-keys)
(let ((youtube-dl (assoc-ref inputs "youtube-dl")))
;; .el is read-only in git.
(chmod "youtube-dl.el" #o644)
;; Specify the absolute file names of the various
@ -32802,12 +32799,13 @@ statistics with the help of @code{tokei}.")
(emacs-substitute-variables
"youtube-dl.el"
("youtube-dl-program"
(string-append youtube-dl "/bin/youtube-dl")))))))))
(search-input-file inputs "bin/yt-dlp"))))))))
(inputs (list yt-dlp))
(home-page "https://github.com/skeeto/youtube-dl-emacs/")
(synopsis "Emacs youtube-dl download manager")
(description "This package manages a video download queue for
@command{youtube-dl}, which serves as the back end. It manages a single
@command{youtube-dl} subprocess, downloading one video at a time. New videos
@command{yt-dlp}, which serves as the back end. It manages a single
@command{yt-dlp} subprocess, downloading one video at a time. New videos
can be queued at any time.")
(license license:unlicense))))