# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 883784239 0
# Node ID b916d29222a3820b564fb17b8bace9d1ecaf0df2
# Parent  460e5621e8c9a352d4a4b3711e0e51e312e010e3
(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.

diff -r 460e5621e8c9 -r b916d29222a3 src/keymap.c
--- a/src/keymap.c	Fri Jan 02 23:23:21 1998 +0000
+++ b/src/keymap.c	Fri Jan 02 23:37:19 1998 +0000
@@ -1077,6 +1077,16 @@
 	{
 	  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;