# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 769813942 0
# Node ID 93b5868150b91bc232c43d359784c86e5beadd4b
# Parent  c5ae1297d99425b6d4d4c8108c5e37c09573194b
(describe_map): Fix the call to Fequal.

diff -r c5ae1297d994 -r 93b5868150b9 src/keymap.c
--- a/src/keymap.c	Tue May 24 19:50:30 1994 +0000
+++ b/src/keymap.c	Tue May 24 21:12:22 1994 +0000
@@ -2126,7 +2126,7 @@
 	     using an inherited keymap.  So skip anything we've already
 	     encountered.  */
 	  tem = Fassq (tail, *seen);
-	  if (CONSP (tem) && Fequal (XCONS (tem)->car, keys))
+	  if (CONSP (tem) && !NILP (Fequal (XCONS (tem)->car, keys)))
 	    break;
 	  *seen = Fcons (Fcons (tail, keys), *seen);
 	}