897 |
The variable `quail-keyboard-layout-type' holds the currently selected |
The variable `quail-keyboard-layout-type' holds the currently selected |
898 |
keyboard type." |
keyboard type." |
899 |
(interactive |
(interactive |
900 |
(list (completing-read "Keyboard type (default, current choice): " |
(list (completing-read "Keyboard type (default current choice): " |
901 |
quail-keyboard-layout-alist |
quail-keyboard-layout-alist |
902 |
nil t))) |
nil t))) |
903 |
(or (and keyboard-type (> (length keyboard-type) 0)) |
(or (and keyboard-type (> (length keyboard-type) 0)) |