gnu: rhythmbox: Update to 3.4.6.

* gnu/packages/gnome.scm (rhythmbox): Update to 3.4.6.
[build-system]: Use meson-build-system.
[glib-or-gtk?]: New argument.
[configure-flags]: Delete argument.
[phases]{skip-gtk-update-icon-cache}: New phase.
{wrap-rhythmbox}: Simplify.
[native-inputs]: Remove labels.  Replace intltool with gettext-minimal.
[inputs]: Add bash-minimal.  Remove labels.  Remove libsoup.
This commit is contained in:
Maxim Cournoyer 2022-09-09 13:51:10 -04:00
parent 77ad9ef333
commit bcb877d391
No known key found for this signature in database
GPG key ID: 1260E46482E63562

View file

@ -6583,92 +6583,89 @@ (define-public totem
(license license:gpl2+))) (license license:gpl2+)))
(define-public rhythmbox (define-public rhythmbox
(package (package
(name "rhythmbox") (name "rhythmbox")
(version "3.4.4") (version "3.4.6")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/rhythmbox/" (uri (string-append "mirror://gnome/sources/rhythmbox/"
(version-major+minor version) "/" (version-major+minor version) "/"
"rhythmbox-" version ".tar.xz")) "rhythmbox-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"142xcvw4l19jyr5i72nbnrihs953pvrrzcbijjn9dxmxszbv03pf")))) "0d5hbsdk2p8w567mfzy4kk8xn4d227hrbyy857li3r2mrq884mpr"))))
(build-system glib-or-gtk-build-system) (build-system meson-build-system)
(arguments (arguments
`(#:configure-flags (list
(list "--enable-lirc" #:glib-or-gtk? #t
"--enable-python"
"--enable-vala"
"--with-brasero"
"--with-gudev"
"--with-libsecret")
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-after (add-after 'unpack 'skip-gtk-update-icon-cache
'install 'wrap-rhythmbox (lambda _
(lambda* (#:key inputs outputs #:allow-other-keys) (substitute* "meson.build"
(let ((out (assoc-ref outputs "out")) (("gtk_update_icon_cache: true")
(gi-typelib-path (getenv "GI_TYPELIB_PATH")) "gtk_update_icon_cache: false"))))
(gst-plugin-path (getenv "GST_PLUGIN_SYSTEM_PATH")) (add-after 'install 'wrap-rhythmbox
(grl-plugin-path (getenv "GRL_PLUGIN_PATH")) (lambda* (#:key outputs #:allow-other-keys)
(python-path (getenv "GUIX_PYTHONPATH"))) (wrap-program (search-input-file outputs "bin/rhythmbox")
(wrap-program (string-append out "/bin/rhythmbox") `("GI_TYPELIB_PATH" ":" prefix
`("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path)) (,(getenv "GI_TYPELIB_PATH")))
`("GST_PLUGIN_SYSTEM_PATH" ":" prefix (,gst-plugin-path)) `("GST_PLUGIN_SYSTEM_PATH" ":" prefix
`("GRL_PLUGIN_PATH" ":" prefix (,grl-plugin-path)) (,(getenv "GST_PLUGIN_SYSTEM_PATH")))
`("GUIX_PYTHONPATH" ":" prefix (,python-path)))) `("GRL_PLUGIN_PATH" ":" prefix
#t))))) (,(getenv "GRL_PLUGIN_PATH")))
(propagated-inputs `("GUIX_PYTHONPATH" ":" prefix
(list dconf)) (,(getenv "GUIX_PYTHONPATH")))))))))
(native-inputs (propagated-inputs
`(("itstool" ,itstool) (list dconf))
("intltool" ,intltool) (native-inputs
("glib" ,glib "bin") (list desktop-file-utils
("gobject-introspection" ,gobject-introspection) gettext-minimal
("desktop-file-utils" ,desktop-file-utils) gobject-introspection
("pkg-config" ,pkg-config) `(,glib "bin")
("xmllint" ,libxml2))) itstool
(inputs pkg-config
`(("json-glib" ,json-glib) vala))
("tdb" ,tdb) (inputs
("gnome-desktop" ,gnome-desktop) ;; TODO:
("python" ,python) ;; * libgpod
("python-pygobject" ,python-pygobject) ;; * mx
("vala" ,vala) ;; TODO: clutter* only used by visualizer plugin, which also requires mx
("gmime" ,gmime) ;;clutter
("adwaita-icon-theme" ,adwaita-icon-theme) ;;clutter-gtk
("grilo" ,grilo) ;;clutter-gst
("grilo-plugins" ,grilo-plugins) (list adwaita-icon-theme
("gstreamer" ,gstreamer) atk
("gst-plugins-base" ,gst-plugins-base) bash-minimal
("gst-plugins-good" ,gst-plugins-good) brasero
("totem-pl-parser" ,totem-pl-parser) json-glib
("libgudev" ,libgudev) gmime
;;("libmtp" ,libmtp) FIXME: Not detected gnome-desktop
("libsecret" ,libsecret) grilo
("libsoup" ,libsoup) grilo-plugins
("libnotify" ,libnotify) gsettings-desktop-schemas
("libpeas" ,libpeas) gst-plugins-base
("libsoup" ,libsoup-minimal-2) gst-plugins-good
("lirc" ,lirc) gstreamer
;; TODO: clutter* only used by visualizer plugin, which also requires mx gtk+
;;("clutter" ,clutter) libgudev
;;("clutter-gtk" ,clutter-gtk) libnotify
;;("clutter-gst" ,clutter-gst) libpeas
("gsettings-desktop-schemas" ,gsettings-desktop-schemas) libsecret
("atk" ,atk) libmtp
("pango" ,pango) libsoup-minimal-2
("gtk+" ,gtk+) libxml2
;; TODO: lirc
;; * libgpod pango
;; * mx python
("brasero" ,brasero))) python-pygobject
(home-page "https://wiki.gnome.org/Apps/Rhythmbox") tdb
(synopsis "Music player for GNOME") totem-pl-parser))
(description "Rhythmbox is a music playing application for GNOME. It (home-page "https://wiki.gnome.org/Apps/Rhythmbox")
(synopsis "Music player for GNOME")
(description "Rhythmbox is a music playing application for GNOME. It
supports playlists, song ratings, and any codecs installed through gstreamer.") supports playlists, song ratings, and any codecs installed through gstreamer.")
(license license:gpl2+))) (license license:gpl2+)))
(define-public eog (define-public eog
(package (package