From d610e48010add404d74b5afd4e6dfb288e776c43 Mon Sep 17 00:00:00 2001 From: hayashi Date: Mon, 9 Jul 2001 06:16:47 +0000 Subject: [PATCH] * its.el (its-mode-map): Use XEmacs compatible form to define keymap. --- ChangeLog | 5 +++++ its.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index dca5409..b2413f2 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,10 @@ 2001-07-09 Yoshiki Hayashi + * its.el (its-mode-map): Use XEmacs compatible form to define + keymap. + +2001-07-09 Yoshiki Hayashi + * egg.el (egg-last-method-name): Initialize buffer-local varaible to nil. * its-keydef.el (its-select-func-alist): Ditto. diff --git a/its.el b/its.el index c33506d..25728ea 100644 --- a/its.el +++ b/its.el @@ -267,8 +267,8 @@ (define-key map "\M-y" 'its-yank-pop) (define-key map [backspace] 'its-delete-backward-SYL) (define-key map [delete] 'its-delete-backward-SYL) - (define-key map [M-backspace] 'its-delete-backward-SYL-by-keystroke) - (define-key map [M-delete] 'its-delete-backward-SYL-by-keystroke) + (define-key map [(meta backspace)] 'its-delete-backward-SYL-by-keystroke) + (define-key map [(meta delete)] 'its-delete-backward-SYL-by-keystroke) (define-key map [right] 'its-forward-SYL) (define-key map [left] 'its-backward-SYL) (while (< i 127) -- 1.7.10.4