mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 07:26:13 -05:00
gnu: gpodder: Update to 3.11.4.
* gnu/packages/gpodder.scm (gpodder): Update to 3.11.4. [inputs]: Replace youtube-dl with yt-dlp. [arguments]: Use G-expressions. Use #$output and search-input-file instead of assoc-ref. Remove trailing #t from phases. Change-Id: Ic5c07f63e1e5e419857ead2d58cd273660e0cad5 Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
parent
5d2d395477
commit
73ec844389
1 changed files with 35 additions and 39 deletions
|
@ -22,6 +22,7 @@
|
||||||
(define-module (gnu packages gpodder)
|
(define-module (gnu packages gpodder)
|
||||||
#:use-module (guix download)
|
#:use-module (guix download)
|
||||||
#:use-module (guix git-download)
|
#:use-module (guix git-download)
|
||||||
|
#:use-module (guix gexp)
|
||||||
#:use-module (guix packages)
|
#:use-module (guix packages)
|
||||||
#:use-module (guix utils)
|
#:use-module (guix utils)
|
||||||
#:use-module ((guix licenses) #:prefix license:)
|
#:use-module ((guix licenses) #:prefix license:)
|
||||||
|
@ -50,7 +51,7 @@ (define-module (gnu packages gpodder)
|
||||||
(define-public gpodder
|
(define-public gpodder
|
||||||
(package
|
(package
|
||||||
(name "gpodder")
|
(name "gpodder")
|
||||||
(version "3.11.1")
|
(version "3.11.4")
|
||||||
(source
|
(source
|
||||||
(origin
|
(origin
|
||||||
(method git-fetch)
|
(method git-fetch)
|
||||||
|
@ -58,7 +59,7 @@ (define-public gpodder
|
||||||
(url "https://github.com/gpodder/gpodder")
|
(url "https://github.com/gpodder/gpodder")
|
||||||
(commit version)))
|
(commit version)))
|
||||||
(sha256
|
(sha256
|
||||||
(base32 "121cb8qz4rp6602lpbi6m2vqx3ar1cw2s4z4r7nr5qaxb0q3gk9n"))
|
(base32 "1zmp7kkldb59fx1y6k4mkff8ngmyb9pflcd3yqb28m9wb9bp4j4h"))
|
||||||
(file-name (git-file-name name version))
|
(file-name (git-file-name name version))
|
||||||
(patches (search-patches "gpodder-disable-updater.patch"))))
|
(patches (search-patches "gpodder-disable-updater.patch"))))
|
||||||
(build-system python-build-system)
|
(build-system python-build-system)
|
||||||
|
@ -81,47 +82,42 @@ (define-public gpodder
|
||||||
python-mutagen
|
python-mutagen
|
||||||
python-mygpoclient
|
python-mygpoclient
|
||||||
python-podcastparser
|
python-podcastparser
|
||||||
youtube-dl
|
yt-dlp
|
||||||
xdg-utils))
|
xdg-utils))
|
||||||
(arguments
|
(arguments
|
||||||
'(#:phases
|
(list
|
||||||
(modify-phases %standard-phases
|
#:phases
|
||||||
;; Avoid needing xdg-utils as a propagated input.
|
#~(modify-phases %standard-phases
|
||||||
(add-after 'unpack 'patch-xdg-open
|
;; Avoid needing xdg-utils as a propagated input.
|
||||||
(lambda* (#:key inputs #:allow-other-keys)
|
(add-after 'unpack 'patch-xdg-open
|
||||||
(let ((xdg-utils (assoc-ref inputs "xdg-utils")))
|
(lambda* (#:key inputs #:allow-other-keys)
|
||||||
(substitute* "src/gpodder/util.py"
|
(substitute* "src/gpodder/util.py"
|
||||||
(("xdg-open") (string-append xdg-utils "/bin/xdg-open")))
|
(("xdg-open") (search-input-file inputs "bin/xdg-open")))))
|
||||||
#t)))
|
(replace 'check
|
||||||
(replace 'check
|
(lambda* (#:key tests? #:allow-other-keys)
|
||||||
(lambda* (#:key tests? #:allow-other-keys)
|
(when tests?
|
||||||
(when tests?
|
(invoke "make" "unittest"))))
|
||||||
(invoke "make" "unittest"))))
|
;; 'msgmerge' introduces non-determinism by resetting the
|
||||||
;; 'msgmerge' introduces non-determinism by resetting the
|
;; POT-Creation-Date in .po files.
|
||||||
;; POT-Creation-Date in .po files.
|
(add-before 'install 'do-not-run-msgmerge
|
||||||
(add-before 'install 'do-not-run-msgmerge
|
(lambda _
|
||||||
(lambda _
|
(substitute* "makefile"
|
||||||
(substitute* "makefile"
|
(("msgmerge") "true"))))
|
||||||
(("msgmerge") "true"))
|
(add-before 'install 'make-po-files-writable
|
||||||
#t))
|
(lambda _
|
||||||
(add-before 'install 'make-po-files-writable
|
(for-each
|
||||||
(lambda _
|
|
||||||
(for-each
|
|
||||||
(lambda (f)
|
(lambda (f)
|
||||||
(chmod f #o664))
|
(chmod f #o664))
|
||||||
(find-files "po"))
|
(find-files "po"))))
|
||||||
#t))
|
(replace 'install
|
||||||
(replace 'install
|
(lambda _
|
||||||
(lambda* (#:key outputs #:allow-other-keys)
|
(setenv "PREFIX" #$output)
|
||||||
(setenv "PREFIX" (assoc-ref outputs "out"))
|
(invoke "make" "install")))
|
||||||
(invoke "make" "install")))
|
(add-after 'install 'wrap-gpodder
|
||||||
(add-after 'install 'wrap-gpodder
|
(lambda _
|
||||||
(lambda* (#:key outputs #:allow-other-keys)
|
(let ((gi-typelib-path (getenv "GI_TYPELIB_PATH")))
|
||||||
(let ((out (assoc-ref outputs "out"))
|
(wrap-program (string-append #$output "/bin/gpodder")
|
||||||
(gi-typelib-path (getenv "GI_TYPELIB_PATH")))
|
`("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path)))))))))
|
||||||
(wrap-program (string-append out "/bin/gpodder")
|
|
||||||
`("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path)))
|
|
||||||
#t))))))
|
|
||||||
(home-page "https://gpodder.github.io")
|
(home-page "https://gpodder.github.io")
|
||||||
(synopsis "Simple podcast client")
|
(synopsis "Simple podcast client")
|
||||||
(description "gPodder is a podcatcher, i.e. an application that allows
|
(description "gPodder is a podcatcher, i.e. an application that allows
|
||||||
|
|
Loading…
Reference in a new issue