Mercurial > emacs
changeset 35171:bc4b6bd7103e
(Fexecute_extended_command): Use a
record_unwind_protect to ensure that pop_message is called.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Tue, 09 Jan 2001 13:44:36 +0000 |
parents | a9b677239421 |
children | fe5b376c2e54 |
files | src/keyboard.c |
diffstat | 1 files changed, 6 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/keyboard.c Tue Jan 09 13:43:43 2001 +0000 +++ b/src/keyboard.c Tue Jan 09 13:44:36 2001 +0000 @@ -9070,6 +9070,8 @@ } return Qnil; } + + DEFUN ("execute-extended-command", Fexecute_extended_command, Sexecute_extended_command, 1, 1, "P", @@ -9192,7 +9194,9 @@ Lisp_Object binding; char *newmessage; int message_p = push_message (); - + int count = BINDING_STACK_SIZE (); + + record_unwind_protect (push_message_unwind, Qnil); binding = Fkey_description (bindings); newmessage @@ -9211,7 +9215,7 @@ && message_p) restore_message (); - pop_message (); + unbind_to (count, Qnil); } }