;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2019 Pierre Langlois <pierre.langlois@gmx.com>
+;;; Copyright © 2019, 2020 Pierre Langlois <pierre.langlois@gmx.com>
+;;; Copyright © 2020 Tobias Geerinckx-Rice <me@tobias.gr>
;;;
;;; This file is part of GNU Guix.
;;;
(define-module (gnu packages gpodder)
#:use-module (guix download)
+ #:use-module (guix git-download)
#:use-module (guix packages)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix build-system cmake)
#:use-module (guix build-system python)
#:use-module (gnu packages)
#:use-module (gnu packages check)
+ #:use-module (gnu packages freedesktop)
+ #:use-module (gnu packages glib)
+ #:use-module (gnu packages gtk)
#:use-module (gnu packages pkg-config)
- #:use-module (gnu packages qt))
+ #:use-module (gnu packages python-web)
+ #:use-module (gnu packages python-xyz)
+ #:use-module (gnu packages qt)
+ #:use-module (gnu packages video))
+
+(define-public gpodder
+ (package
+ (name "gpodder")
+ (version "3.10.16")
+ (source
+ (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/gpodder/gpodder")
+ (commit version)))
+ (sha256
+ (base32
+ "0pbpaasd7kj6y25nm45y1qyb9sxd4570f7g6zkfcpf6pa3nx7qkq"))
+ (file-name (git-file-name name version))
+ (patches (search-patches "gpodder-disable-updater.patch"))))
+ (build-system python-build-system)
+ (native-inputs
+ `(("intltool" ,intltool)
+ ("python-coverage" ,python-coverage)
+ ("python-minimock" ,python-minimock)))
+ (inputs
+ `(("gtk+" ,gtk+)
+ ("python-pygobject" ,python-pygobject)
+ ("python-pycairo" ,python-pycairo)
+ ("python-dbus" ,python-dbus)
+ ("python-html5lib" ,python-html5lib)
+ ("python-mygpoclient" ,python-mygpoclient)
+ ("python-podcastparser" ,python-podcastparser)
+ ("youtube-dl" ,youtube-dl)
+ ("xdg-utils" ,xdg-utils)))
+ (arguments
+ '(#:phases
+ (modify-phases %standard-phases
+ ;; Avoid needing xdg-utils as a propagated input.
+ (add-after 'unpack 'patch-xdg-open
+ (lambda* (#:key inputs #:allow-other-keys)
+ (let ((xdg-utils (assoc-ref inputs "xdg-utils")))
+ (substitute* "src/gpodder/util.py"
+ (("xdg-open") (string-append xdg-utils "/bin/xdg-open")))
+ #t)))
+ (replace 'check
+ (lambda _
+ ; The `unittest' target overrides the PYTHONPATH variable.
+ (substitute* "makefile"
+ (("PYTHONPATH=src/") "PYTHONPATH=${PYTHONPATH}:src/"))
+ (invoke "make" "unittest")))
+ ;; 'msgmerge' introduces non-determinism by resetting the
+ ;; POT-Creation-Date in .po files.
+ (add-before 'install 'do-not-run-msgmerge
+ (lambda _
+ (substitute* "makefile"
+ (("msgmerge") "true"))
+ #t))
+ (add-before 'install 'make-po-files-writable
+ (lambda _
+ (for-each
+ (lambda (f)
+ (chmod f #o664))
+ (find-files "po"))
+ #t))
+ (replace 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (setenv "PREFIX" (assoc-ref outputs "out"))
+ (invoke "make" "install")))
+ (add-after 'install 'wrap-gpodder
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((out (assoc-ref outputs "out"))
+ (gi-typelib-path (getenv "GI_TYPELIB_PATH")))
+ (wrap-program (string-append out "/bin/gpodder")
+ `("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path)))
+ #t))))))
+ (home-page "https://gpodder.github.io")
+ (synopsis "Simple podcast client")
+ (description "gPodder is a podcatcher, i.e. an application that allows
+podcast feeds (RSS, Atom, Youtube, Soundcloud, Vimeo and XSPF) to be
+subscribed to, checks for new episodes and allows the podcast to be saved
+locally for later listening.")
+ (license license:gpl3+)))
(define-public libmygpo-qt
(package
;; TODO: Enable tests when https://github.com/gpodder/gpodder/issues/446
;; is fixed.
#:tests? #f))
- (home-page "http://wiki.gpodder.org/wiki/Libmygpo-qt")
+ (home-page "https://gpodder.github.io")
(synopsis "Qt/C++ library wrapping the gpodder web service")
(description "@code{libmygpo-qt} is a Qt/C++ library wrapping the
@url{https://gpodder.net} APIs. It allows applications to discover, manage
and track podcasts.")
(license license:lgpl2.1+)))
+(define-public python-mygpoclient
+ (package
+ (name "python-mygpoclient")
+ (version "1.8")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (pypi-uri "mygpoclient" version))
+ (sha256
+ (base32
+ "1fi5x6k1mngr0iviw2s4n1f3y2x7pwqy5ivkcrjdprzvwr37f0mh"))))
+ (build-system python-build-system)
+ (native-inputs
+ `(("python-coverage" ,python-coverage)
+ ("python-minimock" ,python-minimock)
+ ("python-nose" ,python-nose)))
+ (arguments
+ `(#:phases
+ (modify-phases %standard-phases
+ (replace 'check
+ (lambda _
+ (invoke "make" "test"))))))
+ (home-page "https://mygpoclient.readthedocs.io")
+ (synopsis "Python library for the gPodder web service")
+ (description "@code{mygpoclient} provides an easy and structured way to
+access the @url{https://gpodder.net} web services. In addition to
+subscription list synchronization and storage, the API supports uploading and
+downloading episode status changes.")
+ (license license:gpl3+)))
+
(define-public python-podcastparser
(package
(name "python-podcastparser")
- (version "0.6.4")
+ (version "0.6.5")
(source
(origin
(method url-fetch)
(uri (pypi-uri "podcastparser" version))
(sha256
- (base32
- "1ksj1gcmbnm5i43xhpqxbs2mqi6xzawwwkwbh9h6lwa1wxxvv247"))))
+ (base32 "0k62ppg20i41gcc5x8ddjn7zbpy47hqpxzrq9257g2c71m4qw07b"))))
(native-inputs
- `(("python-nose" ,python-nose)))
+ `(("python-coverage" ,python-coverage)
+ ("python-nose" ,python-nose)))
+ (arguments
+ '(#:phases
+ (modify-phases %standard-phases
+ (replace 'check
+ (lambda _ (invoke "nosetests"))))))
(build-system python-build-system)
(home-page "http://gpodder.org/podcastparser")
(synopsis "Simplified and fast RSS parser Python library")