From fde7aff8e2aa69e39a054a9ff739f77d09b67a93 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 4 Sep 1996 05:39:41 +0000 Subject: [PATCH] (Fexecute_extended_command): Fix previous change. --- src/keyboard.c | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/keyboard.c b/src/keyboard.c index a995e551ad3..b1578a3a949 100644 --- a/src/keyboard.c +++ b/src/keyboard.c @@ -6901,6 +6901,8 @@ DEFUN ("execute-extended-command", Fexecute_extended_command, Sexecute_extended_ (prefixarg) Lisp_Object prefixarg; { + defsubr (&Sfocus_frame); + defsubr (&Sunfocus_frame); Lisp_Object function; char buf[40]; Lisp_Object saved_keys; @@ -6909,7 +6911,7 @@ DEFUN ("execute-extended-command", Fexecute_extended_command, Sexecute_extended_ saved_keys = Fvector (this_command_key_count, XVECTOR (this_command_keys)->contents); buf[0] = 0; - GCPRO1 (saved_keys, prefixarg); + GCPRO2 (saved_keys, prefixarg); if (EQ (prefixarg, Qminus)) strcpy (buf, "- "); -- 2.39.2