mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-25 20:19:18 -05:00
gnu: libblockdev: Set default configuration directory.
Fix error from 'udisks': “Failed to get contents of the config dir (/etc/libblockdev/conf.d/)Error opening directory "/etc/libblockdev/conf.d/": No such file or directory.” * gnu/packages/disk.scm (libblockdev)[arguments]: Add phase 'patch-configuration-directory'. Signed-off-by: Efraim Flashner <efraim@flashner.co.il>
This commit is contained in:
parent
7d18deb22e
commit
99f2c93470
1 changed files with 8 additions and 0 deletions
|
@ -802,6 +802,14 @@ (define-public libblockdev
|
||||||
(base32
|
(base32
|
||||||
"15c7g2gbkahmy8c6677pvbvblan5h8jxcqqmn6nlvqwqynq2mkjm"))))
|
"15c7g2gbkahmy8c6677pvbvblan5h8jxcqqmn6nlvqwqynq2mkjm"))))
|
||||||
(build-system gnu-build-system)
|
(build-system gnu-build-system)
|
||||||
|
(arguments
|
||||||
|
`(#:phases
|
||||||
|
(modify-phases %standard-phases
|
||||||
|
(add-after 'unpack 'patch-configuration-directory
|
||||||
|
(lambda* (#:key outputs #:allow-other-keys)
|
||||||
|
(let ((out (assoc-ref outputs "out")))
|
||||||
|
(substitute* "src/lib/blockdev.c"
|
||||||
|
(("/etc/libblockdev/conf.d/" path) (string-append out path)))))))))
|
||||||
(native-inputs
|
(native-inputs
|
||||||
`(("gobject-introspection" ,gobject-introspection)
|
`(("gobject-introspection" ,gobject-introspection)
|
||||||
("pkg-config" ,pkg-config)
|
("pkg-config" ,pkg-config)
|
||||||
|
|
Loading…
Reference in a new issue