[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/04: gnu: cups-minimal: Fix build failure in reset-gzip-timestamps pha
From: |
Leo Famulari |
Subject: |
01/04: gnu: cups-minimal: Fix build failure in reset-gzip-timestamps phase. |
Date: |
Sun, 26 Feb 2017 11:43:59 -0500 (EST) |
lfam pushed a commit to branch core-updates
in repository guix.
commit d043ceedbb3ce1873db97cfe2c8806de64881f01
Author: Leo Famulari <address@hidden>
Date: Sat Feb 25 21:22:08 2017 -0500
gnu: cups-minimal: Fix build failure in reset-gzip-timestamps phase.
* gnu/packages/cups.scm (cups-minimal)[arguments]: Add
'make-manpages-writable'
phase.
---
gnu/packages/cups.scm | 8 ++++++++
1 file changed, 8 insertions(+)
diff --git a/gnu/packages/cups.scm b/gnu/packages/cups.scm
index 20621e3..2649cd3 100644
--- a/gnu/packages/cups.scm
+++ b/gnu/packages/cups.scm
@@ -166,6 +166,14 @@ filters for the PDF-centric printing workflow introduced
by OpenPrinting.")
(substitute* "Makedefs.in"
(("address@hidden@") "INITDIR = @prefix@/@INITDIR@")
(("/bin/sh") (which "sh")))))
+ ;; Make the compressed manpages writable so that the
+ ;; reset-gzip-timestamps phase does not error out.
+ (add-before 'reset-gzip-timestamps 'make-manpages-writable
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (man (string-append out "/share/man")))
+ (for-each (lambda (file) (chmod file #o644))
+ (find-files man "\\.gz")))))
(add-before 'build 'patch-tests
(lambda _
(substitute* "test/ippserver.c"