(Fput_char_attribute): Accept nil as a value of CCS-feature [it means

that specified object does not have code-point of the CCS-feature].

diff --git a/src/chartab.c b/src/chartab.c
index b97f39d..7967606 100644 (file)
--- a/src/chartab.c
+++ b/src/chartab.c
@@ -3568,7 +3568,8 @@ Store CHARACTER's ATTRIBUTE with VALUE.
 
   if (!NILP (ccs))
     {
-      value = put_char_ccs_code_point (character, ccs, value);
+      if ( !NILP (value) )
+       value = put_char_ccs_code_point (character, ccs, value);
       attribute = XCHARSET_NAME (ccs);
     }
   else if (