From 52ecda5997b89b46980c8f15822dac91f50613d4 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Wed, 16 Mar 2011 19:48:44 +0000
Subject: [PATCH] (insert-char-attributes): Use `char-feature-base-name=' for
 `=decomposition' and `=>decomposition'.

---
 lisp/utf-2000/char-db-util.el |    6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/utf-2000/char-db-util.el b/lisp/utf-2000/char-db-util.el
index 00cde18..e9d96f0 100644
--- a/lisp/utf-2000/char-db-util.el
+++ b/lisp/utf-2000/char-db-util.el
@@ -1110,8 +1110,10 @@
 		     (eq name 'ideographic-combination)
 		     (eq name 'ideographic-)
 		     (eq name '=decomposition)
-		     (string-match "^=>*decomposition\\(@[^*]+\\)?$"
-				   (symbol-name name))
+		     (char-feature-base-name= '=decomposition name)
+                     (char-feature-base-name= '=>decomposition name)
+                     ;; (string-match "^=>*decomposition\\(@[^*]+\\)?$"
+                     ;;               (symbol-name name))
 		     (string-match "^\\(->\\|<-\\)[^*]*$" (symbol-name name))
 		     (string-match "^\\(->\\|<-\\)[^*]*\\*sources$"
 				   (symbol-name name))
-- 
1.7.10.4