]> code.delx.au - gnu-emacs/blobdiff - src/keymap.c
(read_minibuf): Fix 2007-01-30 change.
[gnu-emacs] / src / keymap.c
index 20e01759f8d91e324bf1af83f4bbb9f20bf937ed..6b4b8536fe19f0532ede5e8e6ff9dab12159e0ef 100644 (file)
@@ -3455,9 +3455,13 @@ describe_map (map, prefix, elt_describer, partial, shadow,
              tem = shadow_lookup (shadow, kludge, Qt);
              if (!NILP (tem))
                {
+                 /* If both bindings are keymaps, this key is a prefix key,
+                    so don't say it is shadowed.  */
+                 if (KEYMAPP (definition) && KEYMAPP (tem))
+                   ;
                  /* Avoid generating duplicate entries if the
-                    shadowed binding has the same definition. */
-                 if (mention_shadow && !EQ (tem, definition))
+                    shadowed binding has the same definition.  */
+                 else if (mention_shadow && !EQ (tem, definition))
                    this_shadowed = 1;
                  else
                    continue;