diff options
| author | Roman Scherer <roman@burningswell.com> | 2024-09-27 11:14:44 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2024-09-28 12:55:54 +0200 |
| commit | e076b8b88453a2880bc32daeae0bc774149eba92 (patch) | |
| tree | a57dc25467172262b83024dcf9b6ea9c33145ba2 /gnu/installer.scm | |
| parent | 2ae666c471fae8a30cb66fdfd47420ff871d89a9 (diff) | |
installer: Use the latest ‘iso-codes’.
Fixes <https://issues.guix.gnu.org/73081>.
* gnu/installer.scm (compute-locale-step): Use Use iso-codes.
Change-Id: I9a69f7accee965cf5deb2c1b23ce3fda579d465a
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Reported-by: Ricardo Wurmus <rekado@elephly.net>
Diffstat (limited to 'gnu/installer.scm')
| -rw-r--r-- | gnu/installer.scm | 16 |
1 files changed, 10 insertions, 6 deletions
diff --git a/gnu/installer.scm b/gnu/installer.scm index 53af01261eb..5cd99e40131 100644 --- a/gnu/installer.scm +++ b/gnu/installer.scm | |||
| @@ -146,10 +146,14 @@ been performed at build time." | |||
| 146 | 146 | ||
| 147 | (let* ((supported-locales #~(supported-locales->locales | 147 | (let* ((supported-locales #~(supported-locales->locales |
| 148 | #+(glibc-supported-locales))) | 148 | #+(glibc-supported-locales))) |
| 149 | (iso-codes #~(string-append #$iso-codes/pinned "/share/iso-codes/json/")) | 149 | |
| 150 | (iso639-3 #~(string-append #$iso-codes/pinned "iso_639-3.json")) | 150 | ;; Note: Use the latest version of 'iso-codes', including |
| 151 | (iso639-5 #~(string-append #$iso-codes/pinned "iso_639-5.json")) | 151 | ;; Guix-specific changes, so that all languages known to glibc and |
| 152 | (iso3166 #~(string-append #$iso-codes/pinned "iso_3166-1.json")) | 152 | ;; returned by 'glibc-supported-locales'. |
| 153 | (iso-codes #~(string-append #$iso-codes "/share/iso-codes/json/")) | ||
| 154 | (iso639-3 #~(string-append #$iso-codes "iso_639-3.json")) | ||
| 155 | (iso639-5 #~(string-append #$iso-codes "iso_639-5.json")) | ||
| 156 | (iso3166 #~(string-append #$iso-codes "iso_3166-1.json")) | ||
| 153 | (locales-file (build-compiled-file | 157 | (locales-file (build-compiled-file |
| 154 | locales-name | 158 | locales-name |
| 155 | #~`(quote ,#$supported-locales))) | 159 | #~`(quote ,#$supported-locales))) |
| @@ -437,9 +441,9 @@ purposes." | |||
| 437 | ;; (e.g., "French" is always displayed as "français", but | 441 | ;; (e.g., "French" is always displayed as "français", but |
| 438 | ;; "Belgium" could be translated to Dutch, French, or German.) | 442 | ;; "Belgium" could be translated to Dutch, French, or German.) |
| 439 | (bindtextdomain "iso_639-3" ;languages | 443 | (bindtextdomain "iso_639-3" ;languages |
| 440 | #+(file-append iso-codes/pinned "/share/locale")) | 444 | #+(file-append iso-codes "/share/locale")) |
| 441 | (bindtextdomain "iso_3166-1" ;territories | 445 | (bindtextdomain "iso_3166-1" ;territories |
| 442 | #+(file-append iso-codes/pinned "/share/locale")) | 446 | #+(file-append iso-codes "/share/locale")) |
| 443 | 447 | ||
| 444 | ;; Likewise for XKB keyboard layout names. | 448 | ;; Likewise for XKB keyboard layout names. |
| 445 | (bindtextdomain "xkeyboard-config" | 449 | (bindtextdomain "xkeyboard-config" |
