summary refs log tree commit diff
path: root/gnu/system/install.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-04-12 17:19:31 +0200
committerLudovic Courtès <ludo@gnu.org>2019-04-12 17:56:23 +0200
commit13fd0a30877acc8c152c37d0b04158f7b65e4646 (patch)
tree7b91ecd1b3346ae2ab2948279e5a700e0286dc88 /gnu/system/install.scm
parentc7dc604253631588c659c1022256af98ec9262af (diff)
downloadguix-13fd0a30877acc8c152c37d0b04158f7b65e4646.tar.gz
install: Use a font with more glyphs on tty2.
* gnu/system/install.scm (%installation-services): For
'console-font-service-type', use LatGrkCyr-8x16 on tty2.
Diffstat (limited to 'gnu/system/install.scm')
-rw-r--r--gnu/system/install.scm16
1 files changed, 11 insertions, 5 deletions
diff --git a/gnu/system/install.scm b/gnu/system/install.scm
index d37315810d..c32bb6056e 100644
--- a/gnu/system/install.scm
+++ b/gnu/system/install.scm
@@ -342,12 +342,18 @@ Access documentation at any time by pressing Alt-F2.\x1b[0m
           ;; since it takes the installation directory as an argument.
           (cow-store-service)
 
-          ;; Install Unicode support and a suitable font.  Use a font that
-          ;; doesn't have more than 256 glyphs so that we can use colors with
-          ;; varying brightness levels (see note in setfont(8)).
+          ;; Install Unicode support and a suitable font.
           (service console-font-service-type
-                   (map (lambda (tty)
-                          (cons tty "lat9u-16"))
+                   (map (match-lambda
+                          ("tty2"
+                           ;; Use a font that contains characters such as
+                           ;; curly quotes as found in the manual.
+                           '("tty2" . "LatGrkCyr-8x16"))
+                          (tty
+                           ;; Use a font that doesn't have more than 256
+                           ;; glyphs so that we can use colors with varying
+                           ;; brightness levels (see note in setfont(8)).
+                           `(,tty . "lat9u-16")))
                         '("tty1" "tty2" "tty3" "tty4" "tty5" "tty6")))
 
           ;; To facilitate copy/paste.