# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1096618680 0
# Node ID 298e7fb11b6196bfba0da684bdea2d882302d14d
# Parent  817beaa6daf4cb2bc7dd51bd6353bbdca123a85c
(where_is_internal_2): Fix previous change.

diff -r 817beaa6daf4 -r 298e7fb11b61 src/keymap.c
--- 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
     {