diff options
| author | Kenichi Handa | 2004-02-10 11:30:01 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2004-02-10 11:30:01 +0000 |
| commit | 0f4d7511f165d3c4eed9fecbfb3ae72c19315cbb (patch) | |
| tree | cdeaa2018602a5d2d293f146143588dc3d19b311 /src/keymap.c | |
| parent | eb62213c32bc62b7a3aed5a2869119606ce59648 (diff) | |
| download | emacs-0f4d7511f165d3c4eed9fecbfb3ae72c19315cbb.tar.gz emacs-0f4d7511f165d3c4eed9fecbfb3ae72c19315cbb.zip | |
(describe_vector): Handle default value of a char table.
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/keymap.c b/src/keymap.c index 174b32de795..7fa4d9a6f71 100644 --- a/src/keymap.c +++ b/src/keymap.c | |||
| @@ -3384,6 +3384,14 @@ describe_vector (vector, elt_prefix, args, elt_describer, | |||
| 3384 | (*elt_describer) (definition, args); | 3384 | (*elt_describer) (definition, args); |
| 3385 | } | 3385 | } |
| 3386 | 3386 | ||
| 3387 | if (CHAR_TABLE_P (vector) && ! NILP (XCHAR_TABLE (vector)->defalt)) | ||
| 3388 | { | ||
| 3389 | if (!NILP (elt_prefix)) | ||
| 3390 | insert1 (elt_prefix); | ||
| 3391 | insert ("default", 7); | ||
| 3392 | (*elt_describer) (XCHAR_TABLE (vector)->defalt, args); | ||
| 3393 | } | ||
| 3394 | |||
| 3387 | UNGCPRO; | 3395 | UNGCPRO; |
| 3388 | } | 3396 | } |
| 3389 | 3397 | ||