From: tomo <tomo>
Date: Tue, 25 Jun 2002 07:13:31 +0000 (+0000)
Subject: (ids-read-buffer): Fix problem about M-nnnnn' and M-nnnnn".
X-Git-Tag: ids-0_0-1~249
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=986a094871ed673503a088f2ecb7b5125b9becfb;p=chise%2Fids.git

(ids-read-buffer): Fix problem about M-nnnnn' and M-nnnnn".
---

diff --git a/ids-read.el b/ids-read.el
index d37e338..6322c09 100644
--- a/ids-read.el
+++ b/ids-read.el
@@ -46,7 +46,7 @@
 		 ((string-match "U[-+]\\([0-9A-F]+\\)" chs)
 		  (decode-char 'ucs
 			       (string-to-int (match-string 1 chs) 16)))
-		 ((string-match "M-\\([0-9]+\\)" chs)
+		 ((string-match "M-\\([0-9]+\\)\\([^'\"]\\|$\\)" chs)
 		  (decode-char 'ideograph-daikanwa
 			       (string-to-int (match-string 1 chs))))
 		 ((string-match "CB\\([0-9]+\\)" chs)