From: tomo <tomo>
Date: Sat, 8 May 2004 15:27:26 +0000 (+0000)
Subject: (ids-read-buffer): Fix bug about HZKnn-hhhh.
X-Git-Tag: ids-0_0-1~30
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=ed0b746f5e1e1e778f0b6d27c51887bd20cd8812;p=chise%2Fids.git

(ids-read-buffer): Fix bug about HZKnn-hhhh.
---

diff --git a/ids-read.el b/ids-read.el
index 99ccc40..781c4aa 100644
--- a/ids-read.el
+++ b/ids-read.el
@@ -66,7 +66,7 @@
 		   chs)
 		  (decode-char (intern
 				(format "=hanziku-%d"
-					(string-to-int (match-string 1))))
+					(string-to-int (match-string 1 chs))))
 			       (string-to-int (match-string 2 chs) 16)))
 		 ((string-match "M-\\([0-9]+\\)'" chs)
 		  (setq code (string-to-int (match-string 1 chs)))