From b5b90d18cc81b8b415027605bc043b8b89caa5e4 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 24 May 1994 21:12:22 +0000 Subject: [PATCH] (describe_map): Fix the call to Fequal. --- src/keymap.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/keymap.c b/src/keymap.c index 222455328a2..7893c2a054a 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -2126,7 +2126,7 @@ describe_map (map, keys, elt_describer, partial, shadow, seen) 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); } -- 2.39.5