1 files changed, 2 insertions, 1 deletions

diff --git a/src/keymap.c b/src/keymap.c
index f2370225ab8..311a70f25e8 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;
         }