[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
04/04: gnu: fprintd: Provide the right file name for 'fprintd.conf'.
From: |
Ludovic Courtès |
Subject: |
04/04: gnu: fprintd: Provide the right file name for 'fprintd.conf'. |
Date: |
Wed, 11 Jan 2017 22:02:33 +0000 (UTC) |
civodul pushed a commit to branch master
in repository guix.
commit 5c3d6c1da88d67576659567d95b796b391b94f68
Author: Ludovic Courtès <address@hidden>
Date: Wed Jan 11 22:59:49 2017 +0100
gnu: fprintd: Provide the right file name for 'fprintd.conf'.
* gnu/packages/freedesktop.scm (fprintd)[arguments]: New field.
---
gnu/packages/freedesktop.scm | 12 ++++++++++++
1 file changed, 12 insertions(+)
diff --git a/gnu/packages/freedesktop.scm b/gnu/packages/freedesktop.scm
index 9cfb987..66060ea 100644
--- a/gnu/packages/freedesktop.scm
+++ b/gnu/packages/freedesktop.scm
@@ -853,6 +853,18 @@ software.")
(base32
"05915i0bv7q62fqrs5diqwr8dz3pwqa1c1ivcgggkjyw0xk4ldp5"))))
(build-system gnu-build-system)
+ (arguments
+ '(#:phases (modify-phases %standard-phases
+ (add-before 'build 'set-sysconfdir
+ (lambda* (#:key outputs #:allow-other-keys)
+ ;; Work around a bug whereby the 'SYSCONFDIR' macro
+ ;; expands literally to '${prefix}/etc'.
+ (let ((out (assoc-ref outputs "out")))
+ (substitute* "src/main.c"
+ (("SYSCONFDIR, \"fprintd.conf\"")
+ (string-append "\"" out "/etc\", "
+ "\"fprintd.conf\"")))
+ #t))))))
(native-inputs
`(("pkg-config" ,pkg-config)
("intltool" ,intltool)))