Archived
1
0
Fork 0

gnu: sysprof: Update to 3.44.0, enable tests and remove labels.

* gnu/packages/gnome.scm (sysprof): Update to 3.44.0.
[tests?]: Delete argument.
[configure-flags]: Use gexps.
[phases]: Delete trailing #t.
[native-inputs]: Delete labels.
[inputs]: Add libunwind.
This commit is contained in:
Maxim Cournoyer 2022-08-22 21:17:50 -04:00
parent b37b3d4891
commit d7301dc375
No known key found for this signature in database
GPG key ID: 1260E46482E63562

View file

@ -12337,7 +12337,7 @@ GObject introspection bindings.")
(define-public sysprof (define-public sysprof
(package (package
(name "sysprof") (name "sysprof")
(version "3.42.1") (version "3.44.0")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@ -12345,32 +12345,34 @@ GObject introspection bindings.")
(version-major+minor version) "/" (version-major+minor version) "/"
"sysprof-" version ".tar.xz")) "sysprof-" version ".tar.xz"))
(sha256 (sha256
(base32 "0090986ar3lz9m9fy7l5y9ibzzmgsx54cm6gp8ggsxgf0habi5hp")))) (base32 "0nq0icbln0ryqzlybr7wyl19mhr3vkqzs6wasn430fwpf5drypdb"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
`(#:configure-flags (list
(list (string-append "-Dsystemdunitdir=" #:configure-flags
%output #~(list (string-append "-Dsystemdunitdir=" #$output "/share/systemd"))
"/share/systemd")) #:phases
#:tests? #f ; 3/4 test-model-filter barfs some dbus nonsense #~(modify-phases %standard-phases
#:phases (add-after 'unpack 'patch-install-script
(modify-phases %standard-phases (lambda _
(add-after 'unpack 'patch-install-script (substitute* "build-aux/meson/post_install.sh"
(lambda _ (("gtk-update-icon-cache") "true")
(substitute* "build-aux/meson/post_install.sh" (("update-desktop-database") "true")))))))
(("gtk-update-icon-cache") "true")
(("update-desktop-database") "true"))
#t)))))
(propagated-inputs (propagated-inputs
(list polkit)) (list polkit))
(inputs (inputs
(list glib gtk+ json-glib libdazzle polkit)) (list glib
gtk+
json-glib
libdazzle
libunwind
polkit))
(native-inputs (native-inputs
`(("gettext" ,gettext-minimal) (list gettext-minimal
("glib:bin" ,glib "bin") ; for gdbus-codegen, etc. `(,glib "bin") ;for gdbus-codegen, etc.
("itstool" ,itstool) itstool
("pkg-config" ,pkg-config) pkg-config
("xmllint" ,libxml2))) libxml2))
;; This home page is so woefully out of date as to be essentially useless. ;; This home page is so woefully out of date as to be essentially useless.
;; (home-page "http://www.sysprof.com") ;; (home-page "http://www.sysprof.com")
(home-page "https://wiki.gnome.org/Apps/Sysprof") (home-page "https://wiki.gnome.org/Apps/Sysprof")