me
/
guix
Archived
1
0
Fork 0
Code

gnu: fprintd: Remove phase return values. 

* gnu/packages/freedesktop.scm (fprintd)[arguments]:
Don't explicitly return #t from phases.
master
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
1 changed files with 5 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
gnu/packages/freedesktop.scm
View File

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