diff options
author | Ludovic Courtès <ludo@gnu.org> | 2016-09-19 23:36:17 +0900 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2016-09-19 23:36:17 +0900 |
commit | 4a84a48742ab9e15d7d527c3d965f907ec40672c (patch) | |
tree | a8f6b60e1625736e2bd629e9f7cfeed4b00ca9c4 /gnu/system | |
parent | 71654dfdda4890d7a663a36a7fe754b53591aba6 (diff) | |
download | guix-4a84a48742ab9e15d7d527c3d965f907ec40672c.tar.gz |
services: console-font: A single service handles all the VTs.
* gnu/services/base.scm (%default-console-font): New variable. (console-font-shepherd-services): New procedure. (console-font-service-type): Change to use 'service-type'. (console-font-service): Rewrite using 'simple-service'. (%base-services): Use a single CONSOLE-FONT-SERVICE-TYPE instance. * gnu/system/install.scm (installation-services): Likewise.
Diffstat (limited to 'gnu/system')
-rw-r--r-- | gnu/system/install.scm | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/gnu/system/install.scm b/gnu/system/install.scm index b28925f432..dfa003f256 100644 --- a/gnu/system/install.scm +++ b/gnu/system/install.scm @@ -313,12 +313,10 @@ You have been warned. Thanks for being so brave. (cow-store-service) ;; Install Unicode support and a suitable font. - (console-font-service "tty1") - (console-font-service "tty2") - (console-font-service "tty3") - (console-font-service "tty4") - (console-font-service "tty5") - (console-font-service "tty6") + (service console-font-service-type + (map (lambda (tty) + (cons tty %default-console-font)) + '("tty1" "tty2" "tty3" "tty4" "tty5" "tty6"))) ;; To facilitate copy/paste. (gpm-service) |