[meadow-develop:1997/280]encoded-kbd-self-insert-sjis

[Miyashita Hisashi(宮下 尚:HIMI) <himi@xxxxxxxxxxxxxxxxxxxxxxxxx>]

encoded-kb.el中の、これ、不具合ですよね。

## いっしゅんとってもあせった。

---------------------------------
(defun encoded-kbd-self-insert-sjis ()
  (interactive)
  (let ((last-command-char
	 (if (or (< last-command-char ?\xA0) (>= last-command-char ?\xE0))
	     (decode-sjis-char (+ (ash last-command-char 8)
				  (read-char-exclusive)))
!	   (make-char 'latin-jisx0201 last-command-char))))
    (self-insert-command 1)))
---------------------------------
(defun encoded-kbd-self-insert-sjis ()
  (interactive)
  (let ((last-command-char
	 (if (or (< last-command-char ?\xA0) (>= last-command-char ?\xE0))
	     (decode-sjis-char (+ (ash last-command-char 8)
				  (read-char-exclusive)))
!	   (make-char 'katakana-jisx0201 last-command-char))))
    (self-insert-command 1)))
---------------------------------

From himi