changeset 89994:298e7fb11b61

(where_is_internal_2): Fix previous change.
author Kenichi Handa <handa@m17n.org>
date Fri, 01 Oct 2004 08:18:00 +0000
parents 817beaa6daf4
children 58db929d96c6
files src/keymap.c
diffstat 1 files changed, 4 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/src/keymap.c	Fri Oct 01 08:04:25 2004 +0000
+++ b/src/keymap.c	Fri Oct 01 08:18:00 2004 +0000
@@ -2707,17 +2707,16 @@
       int from = XINT (XCAR (key)), to = XINT (XCDR (key));
       Lisp_Object k;
 
-      for (; from <= to; from++)
+      for (; from <= to; to--)
 	{
-	  k = make_number (from);
+	  k = make_number (to);
 	  sequence = where_is_internal_1 (binding, k, definition, noindirect,
 					  this, last, nomenus, last_is_meta);
 	  if (!NILP (sequence))
 	    result = Fcons (sequence, result);
-	  if (from >= 128 && from < to)
-	    from = to - 1;
+	  if (to > 129)
+	    to = 129;
 	}
-      result = Fnreverse (result);
     }
   else
     {