(input_pending): External declaration.

2 files changed, 14 insertions, 0 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 53313fff5d5..7b169877aa9 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -15,6 +15,19 @@
 
 2000-08-09  Gerd Moellmann  <gerd@gnu.org>
 
+        * lisp.h (input_pending): External declaration.
+
+        * dispextern.h (Qredisplay_dont_pause): Declare extern.
+        
+        * xdisp.c (echo_area_display): Display thoroughly if input is
+        pending.  Bind redisplay-dont-pause to t during the redisplay.
+        in case input is pending.
+
+        * dispnew.c (Qredisplay_dont_pause): New variable.
+        (syms_of_display): Initialize and staticpro it.
+        (update_frame_1): Don't interrupt the display for pending input if
+        redisplay_dont_pause is set.
+        
         * dispnew.c (mode_line_string): Declare parameter MODE_LINE_P.
 
         * xfaces.c (Ftty_suppress_bold_inverse_default_colors): Doc fix.
diff --git a/src/lisp.h b/src/lisp.h
index 94ee5b0bf4d..dd98e4288e9 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -2548,6 +2548,7 @@ extern void syms_of_casetab P_ ((void));
 
 extern Lisp_Object Qdisabled, QCfilter;
 extern Lisp_Object Vtty_erase_char, Vhelp_form, Vtop_level;
+extern int input_pending;
 EXFUN (Fdiscard_input, 0);
 EXFUN (Frecursive_edit, 0);
 EXFUN (Fcommand_execute, 4);