guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

01/01: gnu: po4a: Make manpages writable before resetting timestamps.


From: Marius Bakke
Subject: 01/01: gnu: po4a: Make manpages writable before resetting timestamps.
Date: Sun, 26 Mar 2017 05:08:15 -0400 (EDT)

mbakke pushed a commit to branch core-updates
in repository guix.

commit 727bec13a35049f5f819a6f22d93e38aa44220b2
Author: Marius Bakke <address@hidden>
Date:   Sun Mar 26 11:00:46 2017 +0200

    gnu: po4a: Make manpages writable before resetting timestamps.
    
    * gnu/packages/gettext.scm (po4a)[arguments]: Add
    'make-compressed-files-writable' phase.
---
 gnu/packages/gettext.scm | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/gettext.scm b/gnu/packages/gettext.scm
index 26ab677..0de6be0 100644
--- a/gnu/packages/gettext.scm
+++ b/gnu/packages/gettext.scm
@@ -4,6 +4,7 @@
 ;;; Copyright © 2015 Ricardo Wurmus <address@hidden>
 ;;; Copyright © 2016 Efraim Flashner <address@hidden>
 ;;; Copyright © 2016 Alex Kost <address@hidden>
+;;; Copyright © 2017 Marius Bakke <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -160,7 +161,14 @@ translated messages from the catalogs.  Nearly all GNU 
packages use Gettext.")
                           (wrap-program file
                             `("PERL5LIB" ":" prefix (,path))))
                         (find-files bin "\\.*$"))
-              #t))))))
+              #t)))
+         (add-before 'reset-gzip-timestamps 'make-compressed-files-writable
+           (lambda* (#:key outputs #:allow-other-keys)
+             (for-each make-file-writable
+                       (find-files (string-append (assoc-ref outputs "out")
+                                                  "/share/man")
+                                   ".*\\.gz$"))
+             #t)))))
     (native-inputs
      `(("gettext" ,gettext-minimal)
        ("perl-module-build" ,perl-module-build)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]