diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 9f4697af29..6861283ea2 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,9 @@
+2011-09-08  Jan Kratochvil  <jan.kratochvil@redhat.com>
+
+	Fix TUI screen corruption.
+	* utils.c (fputs_maybe_filtered): Replace !input_from_terminal_p by
+	batch_flag.
+
 2011-09-08  Jan Kratochvil  <jan.kratochvil@redhat.com>
 
 	* findvar.c (read_var_value): Never return NULL, throw an error
diff --git a/gdb/utils.c b/gdb/utils.c
index 4654870afb..a979cc4e4e 100644
--- a/gdb/utils.c
+++ b/gdb/utils.c
@@ -2131,8 +2131,8 @@ fputs_maybe_filtered (const char *linebuffer, struct ui_file *stream,
 
   /* Don't do any filtering if it is disabled.  */
   if (stream != gdb_stdout
-      || ! pagination_enabled
-      || ! input_from_terminal_p ()
+      || !pagination_enabled
+      || batch_flag
       || (lines_per_page == UINT_MAX && chars_per_line == UINT_MAX)
       || top_level_interpreter () == NULL
       || ui_out_is_mi_like_p (interp_ui_out (top_level_interpreter ())))