aboutsummaryrefslogtreecommitdiff
path: root/gnu/system
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2016-09-19 23:36:17 +0900
committerLudovic Courtès <ludo@gnu.org>2016-09-19 23:36:17 +0900
commit4a84a48742ab9e15d7d527c3d965f907ec40672c (patch)
treea8f6b60e1625736e2bd629e9f7cfeed4b00ca9c4 /gnu/system
parent71654dfdda4890d7a663a36a7fe754b53591aba6 (diff)
downloadpatches-4a84a48742ab9e15d7d527c3d965f907ec40672c.tar
patches-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.scm10
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)