diff options
author | Ludovic Courtès <ludo@gnu.org> | 2020-06-22 23:40:15 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2020-06-23 00:03:08 +0200 |
commit | 301527be8b5bed9e629aef1d9719a092f60d6b56 (patch) | |
tree | 306cb836e898a8c4c802f1ae0e2d137184e613b8 /guix | |
parent | 5837b3e41fe2e772f944fdae05b1f48084cc783e (diff) |
self: Move statements after definitions in translation derivation.
* guix/self.scm (translate-texi-manuals)[build]: Move statements after
definitions.
Diffstat (limited to 'guix')
-rw-r--r-- | guix/self.scm | 31 |
1 files changed, 15 insertions, 16 deletions
diff --git a/guix/self.scm b/guix/self.scm index 39dfbaadc0..12727ddbae 100644 --- a/guix/self.scm +++ b/guix/self.scm @@ -293,22 +293,6 @@ DOMAIN, a gettext domain." (ice-9 vlist) (srfi srfi-1)) - (mkdir #$output) - - (copy-recursively #$documentation "." - #:log (%make-void-port "w")) - - (for-each - (lambda (file) - (copy-file file (basename file))) - (find-files #$documentation-po ".*.po$")) - - (setenv "GUIX_LOCPATH" - #+(file-append glibc-utf8-locales "/lib/locale")) - (setenv "PATH" #+(file-append gettext "/bin")) - (setenv "LC_ALL" "en_US.UTF-8") - (setlocale LC_ALL "en_US.UTF-8") - (define (translate-tmp-texi po source output) "Translate Texinfo file SOURCE using messages from PO, and write the result to OUTPUT." @@ -414,6 +398,21 @@ a list of extra files, such as '(\"contributing\")." (find-files directory "\\.[a-z]{2}(_[A-Z]{2})?\\.po$"))) + (mkdir #$output) + (copy-recursively #$documentation "." + #:log (%make-void-port "w")) + + (for-each + (lambda (file) + (copy-file file (basename file))) + (find-files #$documentation-po ".*.po$")) + + (setenv "GUIX_LOCPATH" + #+(file-append glibc-utf8-locales "/lib/locale")) + (setenv "PATH" #+(file-append gettext "/bin")) + (setenv "LC_ALL" "en_US.UTF-8") + (setlocale LC_ALL "en_US.UTF-8") + (for-each (match-lambda ((language . po) (translate-texi "guix" po language |