Guix: allow translations to be overriden by update-po.

1 files changed, 6 insertions, 1 deletions

diff --git a/guix.scm b/guix.scm
index a23f42a..f27bb56 100644
--- a/guix.scm
+++ b/guix.scm
@@ -182,7 +182,12 @@
             (mkdir-p directory)
             (with-directory-excursion directory
               (copy-recursively #$(file-append disfluid:translations "/.") "."
-                                #:follow-symlinks? #t))))))))
+                                #:follow-symlinks? #t
+                                #:keep-permissions? #f
+                                #:copy-file
+                                (lambda (file dest)
+                                  (copy-file file dest)
+                                  (chmod dest #o644))))))))))
 
 (define disfluid:raw-source
   (computed-file "disfluid-raw-source"