From 727bec13a35049f5f819a6f22d93e38aa44220b2 Mon Sep 17 00:00:00 2001
From: Marius Bakke <mbakke@fastmail.com>
Date: Sun, 26 Mar 2017 11:00:46 +0200
Subject: 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 26ab6777fe..0de6be07c6 100644
--- a/gnu/packages/gettext.scm
+++ b/gnu/packages/gettext.scm
@@ -4,6 +4,7 @@
 ;;; Copyright © 2015 Ricardo Wurmus <rekado@elephly.net>
 ;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
 ;;; Copyright © 2016 Alex Kost <alezost@gmail.com>
+;;; Copyright © 2017 Marius Bakke <mbakke@fastmail.com>
 ;;;
 ;;; 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)
-- 
cgit v1.2.3

t' method='get' action='/guix/log/gnu/packages/gcal.scm'>
<input type='hidden' name='id' value='ddf1ace0649f6ad024f0ffcc81ea2a736af96e53'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=ddf1ace0649f6ad024f0ffcc81ea2a736af96e53'>root</a>/<a href='/guix/log/gnu?id=ddf1ace0649f6ad024f0ffcc81ea2a736af96e53'>gnu</a>/<a href='/guix/log/gnu/packages?id=ddf1ace0649f6ad024f0ffcc81ea2a736af96e53'>packages</a>/<a href='/guix/log/gnu/packages/gcal.scm?id=ddf1ace0649f6ad024f0ffcc81ea2a736af96e53'>gcal.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/packages/gcal.scm?id=ddf1ace0649f6ad024f0ffcc81ea2a736af96e53&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2017-03-30 01:30:16 +0200'>2017-03-30</span></td><td><a href='/guix/commit/gnu/packages/gcal.scm?id=6fd52309b8f52c9bb59fccffac53e029ce94b698'>gnu: Use HTTPS for almost all gnu.org HOME-PAGEs.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2017-01-23 10:20:09 +0200'>2017-01-23</span></td><td><a href='/guix/commit/gnu/packages/gcal.scm?id=a3dbea473a17bc0966d07c15b2c81ee6978e82a1'>gnu: gcal: Update to 4.1.</a><span class='msg-avail'>...</span></td><td>Efraim Flashner</td></tr>