summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/international/encoded-kb.el4
2 files changed, 6 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 53f6d66471b..ebf953caacd 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-01-24 Kenichi Handa <handa@m17n.org>
+
+ * international/encoded-kb.el (encoded-kbd-iso2022-single-shift):
+ Fix setting of the element of encoded-kbd-iso2022-invocations.
+
2005-01-24 Nick Roberts <nickrob@snap.net.nz>
* progmodes/gdb-ui.el (gdb-goto-breakpoint, gdb-frames-select)
diff --git a/lisp/international/encoded-kb.el b/lisp/international/encoded-kb.el
index cba2f0e45b9..aa6d35c340f 100644
--- a/lisp/international/encoded-kb.el
+++ b/lisp/international/encoded-kb.el
@@ -126,9 +126,7 @@ The following key sequence may cause multilingual text insertion."
(defun encoded-kbd-iso2022-single-shift (ignore)
(let ((char (encoded-kbd-last-key)))
- (aset encoded-kbd-iso2022-invocations 2
- (aref encoded-kbd-iso2022-designations
- (if (= char ?\216) 2 3))))
+ (aset encoded-kbd-iso2022-invocations 2 (if (= char ?\216) 2 3)))
"")
(defun encoded-kbd-self-insert-iso2022-7bit (ignore)