Mercurial > emacs
changeset 20638:c3360a392ae4
Change "?\C-\ " to "?\C- " because "\ " is changed
to standing for nothing in lread.c (read_escape).
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Mon, 12 Jan 1998 05:48:48 +0000 |
| parents | 8a5bdbbc1d6a |
| children | 12240a9b3679 |
| files | lisp/bindings.el lisp/calendar/calendar.el lisp/international/kkc.el lisp/international/quail.el |
| diffstat | 4 files changed, 5 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/bindings.el Sun Jan 11 12:48:04 1998 +0000 +++ b/lisp/bindings.el Mon Jan 12 05:48:48 1998 +0000 @@ -372,10 +372,10 @@ (define-key global-map "\C-@" 'set-mark-command) ;; Many people are used to typing C-SPC and getting C-@. -(define-key global-map [?\C-\ ] 'set-mark-command) +(define-key global-map [?\C- ] 'set-mark-command) (define-key ctl-x-map "\C-x" 'exchange-point-and-mark) (define-key ctl-x-map "\C-@" 'pop-global-mark) -(define-key ctl-x-map [?\C-\ ] 'pop-global-mark) +(define-key ctl-x-map [?\C- ] 'pop-global-mark) (define-key global-map "\C-n" 'next-line) (define-key global-map "\C-p" 'previous-line)
--- a/lisp/calendar/calendar.el Sun Jan 11 12:48:04 1998 +0000 +++ b/lisp/calendar/calendar.el Mon Jan 12 05:48:48 1998 +0000 @@ -1893,7 +1893,7 @@ (define-key calendar-mode-map "\e>" 'calendar-end-of-year) (define-key calendar-mode-map "\C-@" 'calendar-set-mark) ;; Many people are used to typing C-SPC and getting C-@. - (define-key calendar-mode-map [?\C-\ ] 'calendar-set-mark) + (define-key calendar-mode-map [?\C- ] 'calendar-set-mark) (define-key calendar-mode-map "\C-x\C-x" 'calendar-exchange-point-and-mark) (define-key calendar-mode-map "\e=" 'calendar-count-days-region) (define-key calendar-mode-map "gd" 'calendar-goto-date)
--- a/lisp/international/kkc.el Sun Jan 11 12:48:04 1998 +0000 +++ b/lisp/international/kkc.el Mon Jan 12 05:48:48 1998 +0000 @@ -96,7 +96,7 @@ (define-key map "H" 'kkc-hiragana) (define-key map "l" 'kkc-show-conversion-list-or-next-group) (define-key map "L" 'kkc-show-conversion-list-or-prev-group) - (define-key map [?\C-\ ] 'kkc-first-char-only) + (define-key map [?\C- ] 'kkc-first-char-only) (define-key map [delete] 'kkc-cancel) (define-key map [return] 'kkc-terminate) (let ((meta-map (make-sparse-keymap)))
--- a/lisp/international/quail.el Sun Jan 11 12:48:04 1998 +0000 +++ b/lisp/international/quail.el Mon Jan 12 05:48:48 1998 +0000 @@ -302,7 +302,7 @@ (define-key map "\C-h" 'quail-translation-help) ;;; This interferes with handling of escape sequences on non-X terminals. ;;; (define-key map "\e" '(keymap (t . quail-execute-non-quail-command))) - (define-key map [?\C-\ ] 'quail-select-current) + (define-key map [?\C- ] 'quail-select-current) (define-key map [tab] 'quail-completion) (define-key map [delete] 'quail-delete-last-char) (define-key map [backspace] 'quail-delete-last-char)