(current_minor_maps):

If a variable has an entry in Vminor_mode_overriding_map_alist,
and also an entry in Vminor_mode_map_alist, ignore the latter.

1 files changed, 10 insertions, 0 deletions

diff --git a/src/keymap.c b/src/keymap.c
index 0ba367d29f8..4137de08a57 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -1077,6 +1077,16 @@ current_minor_maps (modeptr, mapptr)
         {
           Lisp_Object temp;
 
+          /* If a variable has an entry in Vminor_mode_overriding_map_alist,
+             and also an entry in Vminor_mode_map_alist,
+             ignore the latter.  */
+          if (list_number == 1)
+            {
+              val = assq_no_quit (var, lists[0]);
+              if (!NILP (val))
+                break;
+            }
+
           if (i >= cmm_size)
             {
               Lisp_Object *newmodes, *newmaps;