diff options
| author | Richard M. Stallman | 1994-05-24 21:12:22 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-05-24 21:12:22 +0000 |
| commit | b5b90d18cc81b8b415027605bc043b8b89caa5e4 (patch) | |
| tree | e715197cf2f1b835398b3015bb3a118b89436185 /src | |
| parent | a7d6cde6162e1bfb44a886bb98310e9b1c3ccb11 (diff) | |
| download | emacs-b5b90d18cc81b8b415027605bc043b8b89caa5e4.tar.gz emacs-b5b90d18cc81b8b415027605bc043b8b89caa5e4.zip | |
(describe_map): Fix the call to Fequal.
Diffstat (limited to 'src')
| -rw-r--r-- | src/keymap.c | 2 |
1 files changed, 1 insertions, 1 deletions
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) | |||
| 2126 | using an inherited keymap. So skip anything we've already | 2126 | using an inherited keymap. So skip anything we've already |
| 2127 | encountered. */ | 2127 | encountered. */ |
| 2128 | tem = Fassq (tail, *seen); | 2128 | tem = Fassq (tail, *seen); |
| 2129 | if (CONSP (tem) && Fequal (XCONS (tem)->car, keys)) | 2129 | if (CONSP (tem) && !NILP (Fequal (XCONS (tem)->car, keys))) |
| 2130 | break; | 2130 | break; |
| 2131 | *seen = Fcons (Fcons (tail, keys), *seen); | 2131 | *seen = Fcons (Fcons (tail, keys), *seen); |
| 2132 | } | 2132 | } |