guix_mirror_bot pushed a commit to branch master
in repository guix.

commit c383446efd5cbbdad4e4d760d9484c88080618ba
Author: Nicolas Graves <[email protected]>
AuthorDate: Tue Aug 12 14:38:12 2025 +0200

    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 <[email protected]>
---
 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'")

Reply via email to