summaryrefslogtreecommitdiff
path: root/gnu/installer/services.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/installer/services.scm')
-rw-r--r--gnu/installer/services.scm8
1 files changed, 6 insertions, 2 deletions
diff --git a/gnu/installer/services.scm b/gnu/installer/services.scm
index b208a20138..3e47caf4c2 100644
--- a/gnu/installer/services.scm
+++ b/gnu/installer/services.scm
@@ -5,6 +5,7 @@
;;; Copyright © 2021 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2021 Leo Famulari <leo@famulari.name>
;;; Copyright © 2023 Denys Nykula <vegan@libre.net.ua>
+;;; Copyright © 2025 Florian Pelz <pelzflorian@pelzflorian.de>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -194,8 +195,11 @@
(if (target-hurd?)
'%base-services/hurd
'%base-services)))
- (native-console-font (match (getenv "LANGUAGE")
- ((or "be" "bg" "el" "eo" "kk" "ky"
+ (native-console-font (match (false-if-exception
+ (string-take (getenv "LANGUAGE") 2))
+ ((or "el" ;easier with more complete Greek font
+ ;; These need Cyrillic:
+ "be" "bg" "kk" "ky"
"mk" "mn" "ru" "sr" "tg" "uk")
"LatGrkCyr-8x16")
(_ #f)))