/[emacs]/emacs/src/keymap.c
ViewVC logotype

Diff of /emacs/src/keymap.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.282.4.12 by handa, Fri Oct 1 08:04:10 2004 UTC revision 1.282.4.13 by handa, Fri Oct 1 08:18:00 2004 UTC
# Line 2707  where_is_internal_2 (args, key, binding) Line 2707  where_is_internal_2 (args, key, binding)
2707        int from = XINT (XCAR (key)), to = XINT (XCDR (key));        int from = XINT (XCAR (key)), to = XINT (XCDR (key));
2708        Lisp_Object k;        Lisp_Object k;
2709    
2710        for (; from <= to; from++)        for (; from <= to; to--)
2711          {          {
2712            k = make_number (from);            k = make_number (to);
2713            sequence = where_is_internal_1 (binding, k, definition, noindirect,            sequence = where_is_internal_1 (binding, k, definition, noindirect,
2714                                            this, last, nomenus, last_is_meta);                                            this, last, nomenus, last_is_meta);
2715            if (!NILP (sequence))            if (!NILP (sequence))
2716              result = Fcons (sequence, result);              result = Fcons (sequence, result);
2717            if (from >= 128 && from < to)            if (to > 129)
2718              from = to - 1;              to = 129;
2719          }          }
       result = Fnreverse (result);  
2720      }      }
2721    else    else
2722      {      {

Legend:
Removed from v.1.282.4.12  
changed lines
  Added in v.1.282.4.13

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26