diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2006-01-03 16:54:47 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2006-01-03 16:54:47 +0000 |
commit | ccf0250b2fe3586c7a3c68c8f8e330c73f2786a6 (patch) | |
tree | 1abfb29a0c45e9b597c215ec26b84c8d976c3f4c /src | |
parent | 6918ac24b08f10fca930d33e6f32d7256a61237a (diff) | |
download | emacs-ccf0250b2fe3586c7a3c68c8f8e330c73f2786a6.tar.gz |
(describe_map_compare): Yet another int/Lisp_Object mixup.
Diffstat (limited to 'src')
-rw-r--r-- | src/keymap.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/keymap.c b/src/keymap.c index f12a66c6326..8f462b3af73 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -3196,8 +3196,8 @@ describe_map_compare (aa, bb) if (INTEGERP (a->event) && !INTEGERP (b->event)) return -1; if (SYMBOLP (a->event) && SYMBOLP (b->event)) - return (Fstring_lessp (a->event, b->event) ? -1 - : Fstring_lessp (b->event, a->event) ? 1 + return (!NILP (Fstring_lessp (a->event, b->event)) ? -1 + : !NILP (Fstring_lessp (b->event, a->event)) ? 1 : 0); return 0; } |