From c383446efd5cbbdad4e4d760d9484c88080618ba Mon Sep 17 00:00:00 2001 From: Nicolas Graves Date: Tue, 12 Aug 2025 14:38:12 +0200 Subject: [PATCH] gnu: youtube-viewer: Replace youtube-dl input by yt-dlp. * gnu/packages/video.scm (youtube-viewer): [inputs]: Replace youtube-dl by yt-dlp. [arguments]<#:phases>: Replace youtube-dl by yt-dlp in phase 'refer-to-inputs. Change-Id: I1cf66ac11a37b5085b5162ff36bc92a265bdb3aa Signed-off-by: Sharlatan Hellseher --- gnu/packages/video.scm | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm index 5b8db6411f..6652a48b9a 100644 --- a/gnu/packages/video.scm +++ b/gnu/packages/video.scm @@ -3334,8 +3334,7 @@ audio, images) from the Web. It can use either mpv or vlc for playback.") perl-term-readline-gnu perl-unicode-linebreak xdg-utils - ;; Some videos play without youtube-dl, but others silently fail to. - youtube-dl)) + yt-dlp)) (arguments `(#:modules ((guix build perl-build-system) (guix build utils) @@ -3348,9 +3347,9 @@ audio, images) from the Web. It can use either mpv or vlc for playback.") (add-after 'unpack 'refer-to-inputs (lambda* (#:key inputs #:allow-other-keys) (substitute* "lib/WWW/YoutubeViewer.pm" - (("'youtube-dl'") - (format #f "'~a/bin/youtube-dl'" - (assoc-ref inputs "youtube-dl")))) + (("'yt-dlp'") + (format #f "'~a'" + (search-input-file inputs "bin/yt-dlp")))) (substitute* '("bin/gtk2-youtube-viewer" "bin/gtk3-youtube-viewer") (("'xdg-open'")