2377 |
for (tail = shadow; CONSP (tail); tail = XCDR (tail)) |
for (tail = shadow; CONSP (tail); tail = XCDR (tail)) |
2378 |
{ |
{ |
2379 |
value = Flookup_key (XCAR (tail), key, flag); |
value = Flookup_key (XCAR (tail), key, flag); |
2380 |
if (!NILP (value) && !NATNUMP (value)) |
if (NATNUMP (value)) |
2381 |
|
{ |
2382 |
|
value = Flookup_key (XCAR (tail), Fsubstring (key, 0, value), flag); |
2383 |
|
if (!NILP (value)) |
2384 |
|
return Qnil; |
2385 |
|
} |
2386 |
|
else if (!NILP (value)) |
2387 |
return value; |
return value; |
2388 |
} |
} |
2389 |
return Qnil; |
return Qnil; |