me
/
guix
Archived
1
0
Fork 0
Code

gnu: cups-pk-helper: Add etc/dbus-1 compatibility symlink. 

* gnu/packages/cups.scm (cups-pk-helper)[arguments]:
Add an 'install-compatibility-symlink phase.
master
Tobias Geerinckx-Rice 2022-08-07 02:00:01 +02:00
parent 56b55a13f6
commit e315d9a802
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 13 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
gnu/packages/cups.scm
View File

@ -477,9 +477,20 @@ device-specific programs to convert and print many types of files.")
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
;; XXX The tests require a running D-Bus and CUPS daemon, of course. ;; XXX The tests require a running D-Bus and CUPS daemon, of course.
(list #:tests? #f)) (list #:tests? #f
#:phases
#~(modify-phases %standard-phases
(add-after 'install 'install-compatibility-symlink
;; XXX Upstream (and, presumably, the world) has moved to
;; /share/dbus-1 over /etc/dbus-1, but Guix System's
;; dbus-configuration-directory has yet to catch up.
;; TODO It should be properly fixed and this phase removed.
(lambda* (#:key outputs #:allow-other-keys)
(with-directory-excursion (assoc-ref outputs "out")
(mkdir-p "etc")
(symlink "../share/dbus-1" "etc/dbus-1")))))))
(native-inputs (native-inputs
(list pkg-config `(,glib "bin"))) (list intltool pkg-config `(,glib "bin")))
(inputs (inputs
(list glib polkit cups-minimal)) (list glib polkit cups-minimal))
(home-page "https://www.freedesktop.org/wiki/Software/cups-pk-helper/") (home-page "https://www.freedesktop.org/wiki/Software/cups-pk-helper/")