(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 (file)
--- 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;