* its.el (its-mode-map): Use XEmacs compatible form to define

keymap.

diff --git a/ChangeLog b/ChangeLog
index dca5409..b2413f2 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
 2001-07-09  Yoshiki Hayashi <yoshiki@xemacs.org>
 
+       * its.el (its-mode-map): Use XEmacs compatible form to define
+       keymap.
+
+2001-07-09  Yoshiki Hayashi <yoshiki@xemacs.org>
+
        * 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 (file)
--- 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)