diff options
author | Gerd Moellmann <gerd@gnu.org> | 2001-01-09 13:45:38 +0000 |
---|---|---|
committer | Gerd Moellmann <gerd@gnu.org> | 2001-01-09 13:45:38 +0000 |
commit | 098ec84ae295902dc37ea0fda5dca9900b652a5a (patch) | |
tree | 2317e8b8bd57793cd34a5a745871a49b6dccfaed | |
parent | 99ee70a989b053aed41e5eb98a914d46f7f3d851 (diff) | |
download | emacs-098ec84ae295902dc37ea0fda5dca9900b652a5a.tar.gz |
(push_message_unwind): New function.
-rw-r--r-- | src/xdisp.c | 13 |
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 |