gnu: gthumb: Improve style.

* gnu/packages/gnome.scm (gthumb):
[arguments]: Use gexp.
[native-inputs]: Rewrite using list.
[inputs]: Rewrite using list.

Change-Id: I925c3ac0ebef89534608926545309ff232e2af01
Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
This commit is contained in:
Nicolas Graves 2023-12-25 16:17:27 +01:00 committed by Mathieu Othacehe
parent 0a55bf68bb
commit 931d893c55
No known key found for this signature in database
GPG key ID: 8354763531769CA6

View file

@ -11812,38 +11812,36 @@ (define-public gthumb
"09flm8s6jrvfya2ypw5873mnnani8ssy7wdv3ra1cljk4bjszy4p")))) "09flm8s6jrvfya2ypw5873mnnani8ssy7wdv3ra1cljk4bjszy4p"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
`(#:glib-or-gtk? #t (list
#:configure-flags #:glib-or-gtk? #t
;; Ensure the RUNPATH contains all installed library locations. #:configure-flags
(list (string-append "-Dc_link_args=-Wl,-rpath=" ;; Ensure the RUNPATH contains all installed library locations.
(assoc-ref %outputs "out") #~(list (string-append "-Dc_link_args=-Wl,-rpath=" #$output
"/lib/gthumb/extensions") "/lib/gthumb/extensions")
(string-append "-Dcpp_link_args=-Wl,-rpath=" (string-append "-Dcpp_link_args=-Wl,-rpath=" #$output
(assoc-ref %outputs "out") "/lib/gthumb/extensions"))))
"/lib/gthumb/extensions"))))
(native-inputs (native-inputs
`(("desktop-file-utils" ,desktop-file-utils) ; for update-desktop-database (list desktop-file-utils ; for update-desktop-database
("glib:bin" ,glib "bin") ; for glib-compile-resources `(,glib "bin") ; for glib-compile-resources
("gtk+:bin" ,gtk+ "bin") ; for gtk-update-icon-cache `(,gtk+ "bin") ; for gtk-update-icon-cache
("intltool" ,intltool) intltool
("itstool" ,itstool) itstool
("pkg-config" ,pkg-config) pkg-config
("python" ,python))) python))
(inputs (inputs
`(("clutter" ,clutter) (list clutter
("clutter-gst" ,clutter-gst) clutter-gst
("clutter-gtk" ,clutter-gtk) clutter-gtk
("colord" ,colord) colord
("exiv2" ,exiv2) exiv2
("gsettings-desktop-schemas" ,gsettings-desktop-schemas) gsettings-desktop-schemas
("gstreamer" ,gstreamer) gtk+
("gtk" ,gtk+) libheif
("libheif" ,libheif) libjpeg-turbo
("libjpeg" ,libjpeg-turbo) libraw
("libraw" ,libraw) (librsvg-for-system)
("librsvg" ,(librsvg-for-system)) libtiff
("libtiff" ,libtiff) libwebp))
("libwebp" ,libwebp)))
(home-page "https://wiki.gnome.org/Apps/Gthumb") (home-page "https://wiki.gnome.org/Apps/Gthumb")
(synopsis "GNOME image viewer and browser") (synopsis "GNOME image viewer and browser")
(description "GThumb is an image viewer, browser, organizer, editor and (description "GThumb is an image viewer, browser, organizer, editor and