From a29754b4f152db15b8a7622d7319cfee62f8d7d8 Mon Sep 17 00:00:00 2001 From: Bruno Victal Date: Sat, 11 Mar 2023 17:54:11 +0000 Subject: [PATCH] gnu: docbook-xml: Fix permissions. * gnu/packages/docbook.scm (docbook-xml-5) [arguments]: Remove unnecessary executable permissions. Signed-off-by: Maxim Cournoyer --- gnu/packages/docbook.scm | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/gnu/packages/docbook.scm b/gnu/packages/docbook.scm index 63c4abc914..1816b19685 100644 --- a/gnu/packages/docbook.scm +++ b/gnu/packages/docbook.scm @@ -62,8 +62,15 @@ (define-public docbook-xml-5 (build-system copy-build-system) (arguments (list + #:modules '((guix build copy-build-system) + (guix build utils) + (srfi srfi-26)) #:phases #~(modify-phases %standard-phases + (add-after 'unpack 'fix-permissions + (lambda _ + ;; XXX: These files do not need 0755 permission. + (for-each (cut chmod <> #o644) (find-files ".")))) (replace 'install (lambda _ (let ((dtd-path (string-append #$output "/xml/dtd/docbook")))