aboutsummaryrefslogtreecommitdiff
path: root/gnu/system
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2024-04-08 15:28:20 +0200
committerLudovic Courtès <ludo@gnu.org>2024-04-29 22:52:08 +0200
commit6228a2b8bac30b502e69cfd372554103492ff96a (patch)
treef3e118bf3ff2d3f570449120484dc1ac96cbb847 /gnu/system
parent0575933ac24ad6b9a101dd762405b0cc002e9a53 (diff)
downloadguix-6228a2b8bac30b502e69cfd372554103492ff96a.tar
guix-6228a2b8bac30b502e69cfd372554103492ff96a.tar.gz
locale: Shrink ‘%default-locale-definitions’ from 34 to 10 locales.
This reduces the default set of locales from 92 MiB to 28 MiB. * gnu/system/locale.scm (%default-locale-definitions): Reduce to 10 locales. Change-Id: I3c092604301d69db591957bcfd62a062c3ac5ab0
Diffstat (limited to 'gnu/system')
-rw-r--r--gnu/system/locale.scm59
1 files changed, 17 insertions, 42 deletions
diff --git a/gnu/system/locale.scm b/gnu/system/locale.scm
index 4ea82e24d5..b8910e1e42 100644
--- a/gnu/system/locale.scm
+++ b/gnu/system/locale.scm
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2014-2017, 2019-2021, 2023 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2014-2017, 2019-2021, 2023-2024 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2018 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2023 Janneke Nieuwenhuizen <jannek@gnu.org>
;;;
@@ -153,9 +153,10 @@ data format changes between libc versions."
(list glibc)))
(define %default-locale-definitions
- ;; Arbitrary set of locales that are built by default. They are here mostly
- ;; to facilitate first-time use to some people, while others may have to add
- ;; a specific <locale-definition>.
+ ;; Arbitrary set of locales that are built by default. They come as a
+ ;; "bonus" in addition to that specified in the 'locale' field of the
+ ;; operating system, for the user's convenience, so they shouldn't take too
+ ;; much space.
(letrec-syntax ((utf8-locale (syntax-rules ()
((_ name*)
(locale-definition
@@ -167,44 +168,18 @@ data format changes between libc versions."
(utf8-locales (syntax-rules ()
((_ name ...)
(list (utf8-locale name) ...)))))
- ;; Add "en_US.UTF-8" for compatibility with Guix 0.8.
- (cons (locale-definition
- (name "en_US.UTF-8")
- (source "en_US")
- (charset "UTF-8"))
- (utf8-locales "ca_ES"
- "cs_CZ"
- "da_DK"
- "de_DE"
- "el_GR"
- "en_AU"
- "en_CA"
- "en_GB"
- "en_US"
- "es_AR"
- "es_CL"
- "es_ES"
- "es_MX"
- "fi_FI"
- "fr_BE"
- "fr_CA"
- "fr_CH"
- "fr_FR"
- "ga_IE"
- "it_IT"
- "ja_JP"
- "ko_KR"
- "nb_NO"
- "nl_NL"
- "pl_PL"
- "pt_PT"
- "ro_RO"
- "ru_RU"
- "sv_SE"
- "tr_TR"
- "uk_UA"
- "vi_VN"
- "zh_CN"))))
+ ;; The six UN official languages plus Portuguese, with at most two
+ ;; variants per language.
+ (utf8-locales "ar_DZ"
+ "en_GB"
+ "en_US"
+ "es_AR"
+ "es_ES"
+ "fr_FR"
+ "pt_BR"
+ "pt_PT"
+ "ru_RU"
+ "zh_CN")))
;;;