Parent Directory | Revision Log | Patch
revision 1.308 by jurta, Wed Nov 9 07:48:38 2005 UTC | revision 1.309 by raeburn, Mon Nov 21 23:32:12 2005 UTC | |
---|---|---|
# | Line 2379 shadow_lookup (shadow, key, flag) | Line 2379 shadow_lookup (shadow, key, flag) |
2379 | value = Flookup_key (XCAR (tail), key, flag); | value = Flookup_key (XCAR (tail), key, flag); |
2380 | if (NATNUMP (value)) | if (NATNUMP (value)) |
2381 | { | { |
2382 | value = Flookup_key (XCAR (tail), Fsubstring (key, 0, value), flag); | value = Flookup_key (XCAR (tail), |
2383 | Fsubstring (key, make_number (0), value), flag); | |
2384 | if (!NILP (value)) | if (!NILP (value)) |
2385 | return Qnil; | return Qnil; |
2386 | } | } |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |