gnu: fprintd: Remove phase return values.

* gnu/packages/freedesktop.scm (fprintd)[arguments]:
Don't explicitly return #t from phases.
This commit is contained in:
Tobias Geerinckx-Rice 2021-12-11 02:13:04 +01:00
parent b35efa1c56
commit 9cbf66b6c7
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79

View file

@ -1715,31 +1715,26 @@ (define-public fprintd
(string-append set "'" out "/share/polkit-1/actions/'\n"))
(("(dbus_data_dir = ).*" _ set)
(string-append set "get_option('prefix')"
" / get_option('datadir')\n")))
#t)))
" / get_option('datadir')\n"))))))
(add-before 'configure 'patch-mistake
(lambda _
(substitute* "meson.build"
(("(storage_path = )(get_option\\('prefix'\\))(.*)"
_ set mistake value)
(string-append set "''" value "\n")))
#t))
(string-append set "''" value "\n")))))
(add-before 'configure 'patch-systemd-dependencies
(lambda _
(substitute* "meson.build"
(("'(libsystemd|systemd)'") "'libelogind'"))
#t))
(("'(libsystemd|systemd)'") "'libelogind'"))))
(add-before 'configure 'ignore-test-dependencies
(lambda _
(substitute* "meson.build"
(("pam_wrapper_dep .*") "")
((".*'(cairo|dbus|dbusmock|gi|pypamtest)': .*,.*") ""))
#t))
((".*'(cairo|dbus|dbusmock|gi|pypamtest)': .*,.*") ""))))
(add-before 'install 'no-polkit-magic
;; Meson magically invokes pkexec, which fails (not setuid).
(lambda _
(setenv "PKEXEC_UID" "something")
#t)))
(setenv "PKEXEC_UID" "something"))))
#:tests? #f)) ; XXX depend on unpackaged packages
(native-inputs
`(("gettext" ,gettext-minimal)