diff options
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/src/keymap.c b/src/keymap.c index dfa060a66f1..5177ccfbf8d 100644 --- a/src/keymap.c +++ b/src/keymap.c | |||
| @@ -2707,17 +2707,16 @@ where_is_internal_2 (args, key, binding) | |||
| 2707 | int from = XINT (XCAR (key)), to = XINT (XCDR (key)); | 2707 | int from = XINT (XCAR (key)), to = XINT (XCDR (key)); |
| 2708 | Lisp_Object k; | 2708 | Lisp_Object k; |
| 2709 | 2709 | ||
| 2710 | for (; from <= to; from++) | 2710 | for (; from <= to; to--) |
| 2711 | { | 2711 | { |
| 2712 | k = make_number (from); | 2712 | k = make_number (to); |
| 2713 | sequence = where_is_internal_1 (binding, k, definition, noindirect, | 2713 | sequence = where_is_internal_1 (binding, k, definition, noindirect, |
| 2714 | this, last, nomenus, last_is_meta); | 2714 | this, last, nomenus, last_is_meta); |
| 2715 | if (!NILP (sequence)) | 2715 | if (!NILP (sequence)) |
| 2716 | result = Fcons (sequence, result); | 2716 | result = Fcons (sequence, result); |
| 2717 | if (from >= 128 && from < to) | 2717 | if (to > 129) |
| 2718 | from = to - 1; | 2718 | to = 129; |
| 2719 | } | 2719 | } |
| 2720 | result = Fnreverse (result); | ||
| 2721 | } | 2720 | } |
| 2722 | else | 2721 | else |
| 2723 | { | 2722 | { |