From 96a6084cd8427bd485cea7e3fd0285338faa84ee Mon Sep 17 00:00:00 2001 From: Raghav Gururajan Date: Sat, 27 Nov 2021 05:28:28 -0500 Subject: gnu: pipe-viewer: Correct references to yt-dlp program. * gnu/packages/video.scm (pipe-viewer)[inputs]: Add yt-dlp. [phases](patch-source): Modify. --- gnu/packages/video.scm | 13 ++++++++++--- 1 file changed, 10 insertions(+), 3 deletions(-) (limited to 'gnu/packages/video.scm') diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm index 0197fff036..8121a72f91 100644 --- a/gnu/packages/video.scm +++ b/gnu/packages/video.scm @@ -1106,7 +1106,10 @@ (define-public pipe-viewer (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 @@ (define-public pipe-viewer (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 @@ (define-public pipe-viewer ("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") -- cgit v1.2.3