diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2015-02-27 14:54:00 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2015-02-27 15:08:37 +0100 |
| commit | 251e8b2ee8a9cb89ce662b9c47d9dcd76dec618b (patch) | |
| tree | ce1c10d833c1b5817a85e38681d44047a6854d8e /guix/build/gnu-build-system.scm | |
| parent | 7184b4b1bd839cd4fd0c9630c050c7854174057d (diff) | |
| download | guix-patches-251e8b2ee8a9cb89ce662b9c47d9dcd76dec618b.tar guix-patches-251e8b2ee8a9cb89ce662b9c47d9dcd76dec618b.tar.gz | |
build-system/gnu: Set $LC_ALL (or similar) to the chosen locale.
Suggested by Mark H Weaver.
* guix/build/utils.scm (locale-category->string): New procedure.
* guix/build/gnu-build-system.scm (install-locale): Add 'setenv' call.
Diffstat (limited to 'guix/build/gnu-build-system.scm')
| -rw-r--r-- | guix/build/gnu-build-system.scm | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/guix/build/gnu-build-system.scm b/guix/build/gnu-build-system.scm index c3cc3ce70a..a2bd9d43d1 100644 --- a/guix/build/gnu-build-system.scm +++ b/guix/build/gnu-build-system.scm @@ -106,8 +106,12 @@ chance to be set." (catch 'system-error (lambda () (setlocale locale-category locale) - (format (current-error-port) "using '~a' locale for category ~a~%" - locale locale-category) + + ;; While we're at it, pass it to sub-processes. + (setenv (locale-category->string locale-category) locale) + + (format (current-error-port) "using '~a' locale for category ~s~%" + locale (locale-category->string locale-category)) #t) (lambda args ;; This is known to fail for instance in early bootstrap where locales |