(Fcommand_execute): gcpro cmd and prefixarg while calling do_autoload.

1 files changed, 7 insertions, 1 deletions

diff --git a/src/keyboard.c b/src/keyboard.c
index a1d0c5514b2..a995e551ad3 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -6854,7 +6854,13 @@ a special event, so ignore the prefix argument and don't clear it.")
       final = Findirect_function (cmd);
 
       if (CONSP (final) && (tem = Fcar (final), EQ (tem, Qautoload)))
-        do_autoload (final, cmd);
+        {
+          struct gcpro gcpro1, gcpro2;
+
+          GCPRO2 (cmd, prefixarg);
+          do_autoload (final, cmd);
+          UNGCPRO;
+        }
       else
         break;
     }