changeset 7669:93b5868150b9

(describe_map): Fix the call to Fequal.
author Richard M. Stallman <rms@gnu.org>
date Tue, 24 May 1994 21:12:22 +0000
parents c5ae1297d994
children b3be53811505
files src/keymap.c
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- 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);
 	}