Mercurial > emacs
comparison lisp/international/quail.el @ 28213:2851f83ea432
(quail-set-keyboard-layout): Typo fixed.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Mon, 20 Mar 2000 23:44:27 +0000 |
| parents | 651d521c8f52 |
| children | b46c4dc8c51a |
comparison
equal
deleted
inserted
replaced
| 28212:7252a5d43f22 | 28213:2851f83ea432 |
|---|---|
| 583 characters generated by them), those are created by assuming the | 583 characters generated by them), those are created by assuming the |
| 584 standard layout defined in `quail-keyboard-layout-standard'. This | 584 standard layout defined in `quail-keyboard-layout-standard'. This |
| 585 function tells Quail system the layout of your keyboard so that what | 585 function tells Quail system the layout of your keyboard so that what |
| 586 you type is correctly handled." | 586 you type is correctly handled." |
| 587 (interactive | 587 (interactive |
| 588 (let* ((completing-ignore-case t) | 588 (let* ((completion-ignore-case t) |
| 589 (type (completing-read "Keyboard type: " | 589 (type (completing-read "Keyboard type: " |
| 590 quail-keyboard-layout-alist))) | 590 quail-keyboard-layout-alist))) |
| 591 (list type))) | 591 (list type))) |
| 592 (let ((layout (assoc kbd-type quail-keyboard-layout-alist))) | 592 (let ((layout (assoc kbd-type quail-keyboard-layout-alist))) |
| 593 (if (null layout) | 593 (if (null layout) |