Commit d7c0be75 authored by Ken Raeburn's avatar Ken Raeburn
Browse files

(shadow_lookup): Use make_number to pass a number to Fsubstring.

parent bd24684b
2005-11-21 Ken Raeburn <raeburn@mit.edu>
* keymap.c (shadow_lookup): Use make_number to pass a number to
Fsubstring.
2005-11-21 Juri Linkov <juri@jurta.org> 2005-11-21 Juri Linkov <juri@jurta.org>
   
* puresize.h (BASE_PURESIZE): Increment to 1180000. * puresize.h (BASE_PURESIZE): Increment to 1180000.
......
...@@ -2379,7 +2379,8 @@ shadow_lookup (shadow, key, flag) ...@@ -2379,7 +2379,8 @@ shadow_lookup (shadow, key, flag)
value = Flookup_key (XCAR (tail), key, flag); value = Flookup_key (XCAR (tail), key, flag);
if (NATNUMP (value)) if (NATNUMP (value))
{ {
value = Flookup_key (XCAR (tail), Fsubstring (key, 0, value), flag); value = Flookup_key (XCAR (tail),
Fsubstring (key, make_number (0), value), flag);
if (!NILP (value)) if (!NILP (value))
return Qnil; return Qnil;
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment