From bf112f37d74e3bce21ef30bfbd90bc64d799c12f Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Mon, 24 Jun 2002 08:25:07 +0000
Subject: [PATCH] (ids-read-buffer): Accept CBnnnnn instead of CB-nnnnn as
 CBETA characters.

---
 ids-read.el |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ids-read.el b/ids-read.el
index 646f3c3..d37e338 100644
--- a/ids-read.el
+++ b/ids-read.el
@@ -49,7 +49,7 @@
 		 ((string-match "M-\\([0-9]+\\)" chs)
 		  (decode-char 'ideograph-daikanwa
 			       (string-to-int (match-string 1 chs))))
-		 ((string-match "CB-\\([0-9]+\\)" chs)
+		 ((string-match "CB\\([0-9]+\\)" chs)
 		  (decode-char 'ideograph-cbeta
 			       (string-to-int (match-string 1 chs))))
 		 ))
-- 
1.7.10.4