* term.c (tty_send_additional_strings): No need to fflush here,

as callers fflush.
(tty_set_terminal_modes): fflush after sending additional strings,
not before.

diff --git a/src/ChangeLog b/src/ChangeLog
index e916fc03fdea9615ceaf3341363f549524764e75..96c46d096248955196d3feaaae25ee81239f1c8b 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,10 @@
+2014-04-17  Paul Eggert  <eggert@cs.ucla.edu>
+
+       * term.c (tty_send_additional_strings): No need to fflush here,
+       as callers fflush.
+       (tty_set_terminal_modes): fflush after sending additional strings,
+       not before.
+
 2014-04-17  Daniel Colascione  <dancol@dancol.org>
 
        * term.c (Qtty_mode_set_strings, Qtty_mode_reset_strings): New

diff --git a/src/term.c b/src/term.c
index 9d9d682a5447529f16328e6ecc97415cb05f6623..6ea9a4eba9a4c9a7ef9be95498ff7b6bf7b457ee 100644 (file)
--- a/src/term.c
+++ b/src/term.c
@@ -165,7 +165,7 @@ tty_ring_bell (struct frame *f)
 /* Set up termcap modes for Emacs. */
 
 static void
-tty_send_additional_strings (struct terminal* terminal, Lisp_Object sym)
+tty_send_additional_strings (struct terminal *terminal, Lisp_Object sym)
 {
   Lisp_Object lisp_terminal;
   Lisp_Object extra_codes;
@@ -180,7 +180,6 @@ tty_send_additional_strings (struct terminal* terminal, Lisp_Object sym)
       if (STRINGP (string))
         {
           fwrite (SDATA (string), 1, SBYTES (string), tty->output);
-          fflush (tty->output);
           if (tty->termscript)
             fwrite (SDATA (string), 1, SBYTES (string), tty->termscript);
         }
@@ -209,8 +208,8 @@ tty_set_terminal_modes (struct terminal *terminal)
       OUTPUT_IF (tty, visible_cursor ? tty->TS_cursor_visible : tty->TS_cursor_normal);
       OUTPUT_IF (tty, tty->TS_keypad_mode);
       losecursor (tty);
-      fflush (tty->output);
       tty_send_additional_strings (terminal, Qtty_mode_set_strings);
+      fflush (tty->output);
     }
 }