Mercurial > emacs
comparison lisp/international/quail.el @ 19987:470e157b3e8a
(quail-translation-keymap): Bind right, left, down, and up keys.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Thu, 25 Sep 1997 12:40:02 +0000 |
| parents | 820fc18dd520 |
| children | b8234ea503cd |
comparison
equal
deleted
inserted
replaced
| 19986:cc81b9c8ae20 | 19987:470e157b3e8a |
|---|---|
| 285 (define-key map "\177" 'quail-delete-last-char) | 285 (define-key map "\177" 'quail-delete-last-char) |
| 286 (define-key map "\C-f" 'quail-next-translation) | 286 (define-key map "\C-f" 'quail-next-translation) |
| 287 (define-key map "\C-b" 'quail-prev-translation) | 287 (define-key map "\C-b" 'quail-prev-translation) |
| 288 (define-key map "\C-n" 'quail-next-translation-block) | 288 (define-key map "\C-n" 'quail-next-translation-block) |
| 289 (define-key map "\C-p" 'quail-prev-translation-block) | 289 (define-key map "\C-p" 'quail-prev-translation-block) |
| 290 (define-key map [right] 'quail-next-translation) | |
| 291 (define-key map [left] 'quail-prev-translation) | |
| 292 (define-key map [down] 'quail-next-translation-block) | |
| 293 (define-key map [up] 'quail-prev-translation-block) | |
| 290 (define-key map "\C-i" 'quail-completion) | 294 (define-key map "\C-i" 'quail-completion) |
| 291 (define-key map "\C-@" 'quail-select-current) | 295 (define-key map "\C-@" 'quail-select-current) |
| 292 (define-key map "\C-h" 'quail-translation-help) | 296 (define-key map "\C-h" 'quail-translation-help) |
| 293 ;;; This interferes with handling of escape sequences on non-X terminals. | 297 ;;; This interferes with handling of escape sequences on non-X terminals. |
| 294 ;;; (define-key map "\e" '(keymap (t . quail-execute-non-quail-command))) | 298 ;;; (define-key map "\e" '(keymap (t . quail-execute-non-quail-command))) |