# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1076412601 0
# Node ID 743cb02a49ddc0620fa9457c5a03546b0ccf2f66
# Parent  c03a2732d0fd764aa25356e0f36fc038dc3d87b7
(describe_vector): Handle default value of a char table.

diff -r c03a2732d0fd -r 743cb02a49dd src/keymap.c
--- a/src/keymap.c	Tue Feb 10 11:28:38 2004 +0000
+++ b/src/keymap.c	Tue Feb 10 11:30:01 2004 +0000
@@ -3384,6 +3384,14 @@
       (*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;
 }