Commit 0f4d7511 authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(describe_vector): Handle default value of a char table.

parent eb62213c
...@@ -3384,6 +3384,14 @@ describe_vector (vector, elt_prefix, args, elt_describer, ...@@ -3384,6 +3384,14 @@ describe_vector (vector, elt_prefix, args, elt_describer,
(*elt_describer) (definition, args); (*elt_describer) (definition, args);
} }
if (CHAR_TABLE_P (vector) && ! NILP (XCHAR_TABLE (vector)->defalt))
{
if (!NILP (elt_prefix))
insert1 (elt_prefix);
insert ("default", 7);
(*elt_describer) (XCHAR_TABLE (vector)->defalt, args);
}
UNGCPRO; UNGCPRO;
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment