summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGerd Moellmann <gerd@gnu.org>2001-01-09 13:45:38 +0000
committerGerd Moellmann <gerd@gnu.org>2001-01-09 13:45:38 +0000
commit098ec84ae295902dc37ea0fda5dca9900b652a5a (patch)
tree2317e8b8bd57793cd34a5a745871a49b6dccfaed
parent99ee70a989b053aed41e5eb98a914d46f7f3d851 (diff)
downloademacs-098ec84ae295902dc37ea0fda5dca9900b652a5a.tar.gz
(push_message_unwind): New function.
-rw-r--r--src/xdisp.c13
1 files changed, 12 insertions, 1 deletions
diff --git a/src/xdisp.c b/src/xdisp.c
index d4f25661e08..367408dbdba 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -1,5 +1,5 @@
/* Display generation from window structure and buffer text.
- Copyright (C) 1985, 86, 87, 88, 93, 94, 95, 97, 98, 99, 2000
+ Copyright (C) 1985, 86, 87, 88, 93, 94, 95, 97, 98, 99, 2000, 2001
Free Software Foundation, Inc.
This file is part of GNU Emacs.
@@ -6363,6 +6363,17 @@ push_message ()
}
+/* Handler for record_unwind_protect calling pop_message. */
+
+Lisp_Object
+push_message_unwind (dummy)
+ Lisp_Object dummy;
+{
+ pop_message ();
+ return Qnil;
+}
+
+
/* Restore message display from the top of Vmessage_stack. */
void