comparison lisp/international/quail.el @ 19811:66b7051ac215

(quail-translation-keymap): Bind C-space to quail-select-current.
author Kenichi Handa <handa@m17n.org>
date Mon, 08 Sep 1997 07:23:23 +0000
parents 953af2c5a9d1
children 1e682aef0ce0
comparison
equal deleted inserted replaced
19810:495951c8a761 19811:66b7051ac215
286 (define-key map "\C-p" 'quail-prev-translation-block) 286 (define-key map "\C-p" 'quail-prev-translation-block)
287 (define-key map "\C-i" 'quail-completion) 287 (define-key map "\C-i" 'quail-completion)
288 (define-key map "\C-@" 'quail-select-current) 288 (define-key map "\C-@" 'quail-select-current)
289 (define-key map "\C-h" 'quail-translation-help) 289 (define-key map "\C-h" 'quail-translation-help)
290 (define-key map "\e" '(keymap (t . quail-execute-non-quail-command))) 290 (define-key map "\e" '(keymap (t . quail-execute-non-quail-command)))
291 (define-key map [?\C-\ ] 'quail-select-current)
291 (define-key map [tab] 'quail-completion) 292 (define-key map [tab] 'quail-completion)
292 (define-key map [delete] 'quail-delete-last-char) 293 (define-key map [delete] 'quail-delete-last-char)
293 (define-key map [backspace] 'quail-delete-last-char) 294 (define-key map [backspace] 'quail-delete-last-char)
294 ;; At last, define default key binding. 295 ;; At last, define default key binding.
295 (append map '((t . quail-execute-non-quail-command)))) 296 (append map '((t . quail-execute-non-quail-command))))