summary refs log tree commit diff
path: root/gnu/installer/newt.scm
diff options
context:
space:
mode:
authorMathieu Othacehe <m.othacehe@gmail.com>2018-12-05 14:36:22 +0900
committerLudovic Courtès <ludo@gnu.org>2019-01-17 14:04:23 +0100
commitc088b2e47f6675199f1ef545df7d04d4532e64e3 (patch)
tree335f80e187ea1da73fbb39a1ca296166e714db90 /gnu/installer/newt.scm
parentdc5f3275ecbddc804875899e9e457299a835d7ab (diff)
downloadguix-c088b2e47f6675199f1ef545df7d04d4532e64e3.tar.gz
installer: Do not ask for keyboard model.
Suppose that the keyboard model is "pc105".

* gnu/installer.scm (apply-keymap): Remove model ...
* gnu/installer/newt/keymap.scm (run-keymap-page): passed here.
(run-model-page): remove procedure
* gnu/installer/record.scm (installer): Edit keymap-page prototype in comment.
* gnu/installer/keymap.scm (default-keyboard-model): New exported parameter.
Diffstat (limited to 'gnu/installer/newt.scm')
-rw-r--r--gnu/installer/newt.scm5
1 files changed, 2 insertions, 3 deletions
diff --git a/gnu/installer/newt.scm b/gnu/installer/newt.scm
index 77a7e6dca2..1f51b111a8 100644
--- a/gnu/installer/newt.scm
+++ b/gnu/installer/newt.scm
@@ -68,9 +68,8 @@
 (define (menu-page steps)
   (run-menu-page steps))
 
-(define* (keymap-page #:key models layouts)
-  (run-keymap-page #:models models
-                   #:layouts layouts))
+(define* (keymap-page layouts)
+  (run-keymap-page layouts))
 
 (define (network-page)
   (run-network-page))