me
/
guix
Archived
1
0
Fork 0

gnu: pipe-viewer: Correct references to yt-dlp program.

* gnu/packages/video.scm (pipe-viewer)[inputs]: Add yt-dlp.
[phases](patch-source): Modify.
master
Raghav Gururajan 2021-11-27 05:28:28 -05:00
parent 6dc682e5b9
commit 96a6084cd8
No known key found for this signature in database
GPG Key ID: 5F5816647F8BE551
1 changed files with 10 additions and 3 deletions

View File

@ -1106,7 +1106,10 @@ H.264 (MPEG-4 AVC) video streams.")
(substitute* (find-files "lib" "\\.pm$")
(("\"youtube-dl\"")
(format #f "\"~a/bin/youtube-dl\""
(assoc-ref inputs "youtube-dl"))))
(assoc-ref inputs "youtube-dl")))
(("\"yt-dlp\"")
(format #f "\"~a/bin/yt-dlp\""
(assoc-ref inputs "yt-dlp"))))
(substitute* (find-files "bin" ".*-viewer$")
(("'ffmpeg'")
(format #f "'~a/bin/ffmpeg'"
@ -1119,7 +1122,10 @@ H.264 (MPEG-4 AVC) video streams.")
(assoc-ref inputs "xdg-utils")))
(("'youtube-dl'")
(format #f "'~a/bin/youtube-dl'"
(assoc-ref inputs "youtube-dl"))))))
(assoc-ref inputs "youtube-dl")))
(("'yt-dlp'")
(format #f "'~a/bin/yt-dlp'"
(assoc-ref inputs "yt-dlp"))))))
(add-after 'install 'install-xdg
(lambda args
(apply (assoc-ref copy:%standard-phases 'install)
@ -1172,7 +1178,8 @@ H.264 (MPEG-4 AVC) video streams.")
("perl-uri-escape" ,perl-uri-escape)
("wget" ,wget)
("xdg-utils" ,xdg-utils)
("youtube-dl" ,youtube-dl)))
("youtube-dl" ,youtube-dl)
("yt-dlp" ,yt-dlp)))
(propagated-inputs
`(("dconf" ,dconf)))
(home-page "https://github.com/trizen/pipe-viewer")