gnu: gnome-desktop: Update to 42.4 and remove input labels.

* gnu/packages/gnome.scm (gnome-desktop): Update to 42.4.
[phases]: Delete trailing #t.
{patch-path}: Use search-input-file.
[native-inputs]: Delete labels.
[propagated-inputs]: Add gtk.  Replace gsettings-desktop-schemas with
gsettings-desktop-schemas-next.
[inputs]: Sort lexicographically.
This commit is contained in:
Maxim Cournoyer 2022-08-22 21:31:35 -04:00
parent f24bf279d4
commit ee871fc92c
No known key found for this signature in database
GPG key ID: 1260E46482E63562

View file

@ -2147,7 +2147,7 @@ (define goa
(define-public gnome-desktop (define-public gnome-desktop
(package (package
(name "gnome-desktop") (name "gnome-desktop")
(version "40.4") (version "42.4")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@ -2156,18 +2156,16 @@ (define-public gnome-desktop
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"1vs5knn2yj6a449p9bn5w5407i1yvxfxg8xv844qgl70hpsrdbl8")))) "09ddr5fzhh02fcn7xl1wy18qfsdqryd5msl2nbhdnsbr0vawkqhw"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
'(#:phases '(#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-before 'configure 'patch-path (add-before 'configure 'patch-path
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(let ((libc (assoc-ref inputs "libc")))
(substitute* "libgnome-desktop/gnome-languages.c" (substitute* "libgnome-desktop/gnome-languages.c"
(("\"locale\"") (("\"locale\"")
(string-append "\"" libc "/bin/locale\""))) (format #f "~s" (search-input-file inputs "bin/locale"))))))
#t)))
(add-before 'configure 'patch-bubblewrap (add-before 'configure 'patch-bubblewrap
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(substitute* "libgnome-desktop/gnome-desktop-thumbnail-script.c" (substitute* "libgnome-desktop/gnome-desktop-thumbnail-script.c"
@ -2179,8 +2177,8 @@ (define-public gnome-desktop
"\", \"" "\", \""
(%store-directory) (%store-directory)
"\",")) "\","))
(("\"--ro-bind\", \"/etc/ld.so.cache\", \"/etc/ld.so.cache\",") "")) (("\"--ro-bind\", \"/etc/ld.so.cache\", \"/etc/ld.so.cache\",")
#t)) ""))))
(add-before 'check 'pre-check (add-before 'check 'pre-check
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
;; Tests require a running X server and locales. ;; Tests require a running X server and locales.
@ -2192,26 +2190,27 @@ (define-public gnome-desktop
(search-input-directory inputs (search-input-directory inputs
"lib/locale"))))))) "lib/locale")))))))
(native-inputs (native-inputs
`(("glib:bin" ,glib "bin") ; for gdbus-codegen (list `(,glib "bin") ;for gdbus-codegen
("glibc-locales" ,glibc-locales) ; for tests glibc-locales ;for tests
("gobject-introspection" ,gobject-introspection) gobject-introspection
("itstool" ,itstool) itstool
("intltool" ,intltool) intltool
("pkg-config" ,pkg-config) pkg-config
("xmllint" ,libxml2) libxml2
("xorg-server" ,xorg-server-for-tests))) xorg-server-for-tests))
(propagated-inputs (propagated-inputs
;; Required by gnome-desktop-3.0.pc. ;; Required by gnome-desktop-3.0.pc.
(list gsettings-desktop-schemas (list gsettings-desktop-schemas-next
gtk
gtk+ gtk+
iso-codes iso-codes
libseccomp libseccomp
libx11 libx11
xkeyboard-config)) xkeyboard-config))
(inputs (inputs
(list gdk-pixbuf (list bubblewrap
gdk-pixbuf
glib glib
bubblewrap
libxext libxext
libxkbfile libxkbfile
libxrandr)) libxrandr))