Archived
1
0
Fork 0

gnu: Add orfondl.

* gnu/packages/video.scm (orfondl): New variable.
[source]: Add snippet deleting prebuilt binary.
(orf-dl): Deprecate in favor of orfondl.

Signed-off-by: Sharlatan Hellseher <sharlatanus@gmail.com>
Change-Id: I3ee3ea9e603d6e4f7d0e3b32177c55d473973e90
This commit is contained in:
Liliana Marie Prikler 2024-06-08 09:14:42 +02:00 committed by Sharlatan Hellseher
parent 9cc7fc6e79
commit 693037101b
No known key found for this signature in database
GPG key ID: 76D727BFF62CD2B5

View file

@ -100,6 +100,7 @@
#:use-module (guix build-system cmake) #:use-module (guix build-system cmake)
#:use-module (guix build-system copy) #:use-module (guix build-system copy)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix build-system go)
#:use-module (guix build-system glib-or-gtk) #:use-module (guix build-system glib-or-gtk)
#:use-module (guix build-system meson) #:use-module (guix build-system meson)
#:use-module (guix build-system perl) #:use-module (guix build-system perl)
@ -147,6 +148,7 @@
#:use-module (gnu packages gnome) #:use-module (gnu packages gnome)
#:use-module (gnu packages gnunet) #:use-module (gnu packages gnunet)
#:use-module (gnu packages gnupg) #:use-module (gnu packages gnupg)
#:use-module (gnu packages golang)
#:use-module (gnu packages gstreamer) #:use-module (gnu packages gstreamer)
#:use-module (gnu packages gtk) #:use-module (gnu packages gtk)
#:use-module (gnu packages haskell-xyz) #:use-module (gnu packages haskell-xyz)
@ -2962,37 +2964,46 @@ To load this plugin, specify the following option when starting mpv:
(patches (search-patches "libvpx-CVE-2016-2818.patch" (patches (search-patches "libvpx-CVE-2016-2818.patch"
"libvpx-CVE-2023-5217.patch")))))) "libvpx-CVE-2023-5217.patch"))))))
(define-public orf-dl (define-public orfondl
(let ((commit "2dbbe7ef4e0efe0f3c1d59c503108e22d9065999") (package
(revision "1")) (name "orfondl")
(package (version "1.0.1")
(name "orf-dl") (source (origin
(version (git-version "0" revision commit)) (method git-fetch)
(source (origin (uri (git-reference
(method git-fetch) (url "https://github.com/badlogic/orfondl")
(uri (git-reference (commit (string-append "v" version))))
(url "https://github.com/tpoechtrager/orf_dl") (file-name (git-file-name name version))
(commit commit))) (sha256
(file-name (git-file-name name version)) (base32
(sha256 "0h1zcxxhvshbc3gkmr33npki6sdjh79haack1cci9k40a0gk144v"))
(base32 (modules '((guix build utils)))
"1w413miy01cm7rzb5c6wwfdnc2sqv87cvxwikafgrkswpimvdjsk")))) (snippet '(begin
(build-system copy-build-system) ;; Delete prebuilt binary file.
(arguments (delete-file "orfondl")))))
(list #:install-plan #~`(("orf_dl.php" "bin/orf-dl")) (build-system go-build-system)
#:phases (arguments
#~(modify-phases %standard-phases (list #:go go-1.19
(add-after 'unpack 'patch-source #:install-source? #f
(lambda* (#:key inputs #:allow-other-keys) #:import-path "github.com/badlogic/orfondl"
(substitute* "orf_dl.php" #:phases
(("ffmpeg") #~(modify-phases %standard-phases
(search-input-file inputs "bin/ffmpeg")))))))) (add-after 'unpack 'patch-source
(inputs (list php ffmpeg)) (lambda* (#:key inputs import-path #:allow-other-keys)
(home-page "https://github.com/tpoechtrager/orf_dl") (substitute* (string-append "src/" import-path "/main.go")
(synopsis "Download videos from tvthek.orf.at") (("\"ffmpeg\"")
(description "This package provides a PHP-based command line application (string-append "\""
(search-input-file inputs "bin/ffmpeg")
"\""))))))))
(inputs (list ffmpeg))
(home-page "https://github.com/tpoechtrager/orf_dl")
(synopsis "Download videos from ORF ON")
(description "This package provides a Go-based command line application
to download videos from Austria's national television broadcaster.") to download videos from Austria's national television broadcaster.")
(license license:gpl2+)))) (license license:bsd-3)))
(define-public orf-dl
(deprecated-package "orf-dl" orfondl))
(define-public yle-dl (define-public yle-dl
(package (package