From: tomo <tomo>
Date: Thu, 2 Jun 2005 17:24:58 +0000 (+0000)
Subject: (Fput_char_attribute): Convert char-specs in value of
X-Git-Tag: r21-4-15-chise-0_22-1^2~105
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=9638bc0aeacc16fe1e41f23cab3cf52d2d317f34;p=chise%2Fxemacs-chise.git.1

(Fput_char_attribute): Convert char-specs in value of
`{<-|->}Oracle-Bones[^*]*' to characters and put reverse links.
(Fsave_char_attribute_table): Use `Fchar_refs_simplify_char_specs' for
`{<-|->}Oracle-Bones[^*]*'.
---

diff --git a/src/chartab.c b/src/chartab.c
index 33f1ee2..1504706 100644
--- a/src/chartab.c
+++ b/src/chartab.c
@@ -3513,7 +3513,7 @@ Store CHARACTER's ATTRIBUTE with VALUE.
 				  "fullwidth\\|halfwidth"
 				  "\\|simplified\\|vulgar\\|wrong"
 				  "\\|same\\|original\\|ancient"
-				  "\\)[^*]*$"),
+				  "\\|Oracle-Bones\\)[^*]*$"),
 		    Fsymbol_name (attribute),
 		    Qnil, Qnil)) )
     {
@@ -3839,7 +3839,7 @@ Save values of ATTRIBUTE into database file.
 		     (build_string ("^\\(<-\\|->\\)\\(simplified"
 				    "\\|same\\|vulgar\\|wrong"
 				    "\\|original\\|ancient"
-				    "\\)[^*]*$"),
+				    "\\|Oracle-Bones\\)[^*]*$"),
 		      Fsymbol_name (attribute),
 		      Qnil, Qnil)) )
 	filter = &Fchar_refs_simplify_char_specs;