diff options
author | Ken Raeburn <[email protected]> | 2005-11-21 23:33:01 +0000 |
---|---|---|
committer | Ken Raeburn <[email protected]> | 2005-11-21 23:33:01 +0000 |
commit | d7c0be75d37fe07fefbb0be1333da9bade496fb2 (patch) | |
tree | 97931109662089fcf98be83b629fb3bf434f8273 /src | |
parent | bd24684be07da191e3481caaa360035e287a6bea (diff) |
(shadow_lookup): Use make_number to pass a number to Fsubstring.
Diffstat (limited to 'src')
-rw-r--r-- | src/ChangeLog | 5 | ||||
-rw-r--r-- | src/keymap.c | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 74e6a16804..105a03a2b8 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2005-11-21 Ken Raeburn <[email protected]> + + * keymap.c (shadow_lookup): Use make_number to pass a number to + Fsubstring. + 2005-11-21 Juri Linkov <[email protected]> * puresize.h (BASE_PURESIZE): Increment to 1180000. diff --git a/src/keymap.c b/src/keymap.c index f2370225ab..311a70f25e 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -2379,7 +2379,8 @@ shadow_lookup (shadow, key, flag) value = Flookup_key (XCAR (tail), key, flag); 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)) return Qnil; } |