1 files changed, 1 insertions, 1 deletions

diff --git a/src/callint.c b/src/callint.c
index 81efb267bdf..87411005a3c 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -589,7 +589,7 @@ invoke it.  If KEYS is omitted or nil, the return value of
         case 'U':               /* Up event from last k or K.  */
           if (!NILP (up_event))
             {
-              args[i] = Fmake_vector (make_fixnum (1), up_event);
+              args[i] = make_vector (1, up_event);
               up_event = Qnil;
               visargs[i] = Fkey_description (args[i], Qnil);
             }