# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 726902254 0
# Node ID be62942446f05a4d88e8a3dea43db98d7f102d77
# Parent  1cc3ee5afc82bc8a148b63e7eb8ae06258fc0eb0
(Fredraw_display): Redraw all visible frames.
Make the non-multi-frame version interactive.

diff -r 1cc3ee5afc82 -r be62942446f0 src/dispnew.c
--- a/src/dispnew.c	Wed Jan 13 01:31:45 1993 +0000
+++ b/src/dispnew.c	Wed Jan 13 05:17:34 1993 +0000
@@ -165,7 +165,7 @@
 }
 
 DEFUN ("redraw-display", Fredraw_display, Sredraw_display, 0, 0, "",
-  "Redraw all frames marked as having their images garbled.")
+  "Clear and redisplay all visible frames."
   ()
 {
   Lisp_Object frame, tail;
@@ -173,7 +173,7 @@
   for (tail = Vframe_list; CONSP (tail); tail = XCONS (tail)->cdr)
     {
       frame = XCONS (tail)->car;
-      if (FRAME_GARBAGED_P (XFRAME (frame)) && FRAME_VISIBLE_P (XFRAME (frame)))
+      if (FRAME_VISIBLE_P (XFRAME (frame)))
 	Fredraw_frame (frame);
     }
   return Qnil;
@@ -189,7 +189,7 @@
 
 #else /* not MULTI_FRAME */
 
-DEFUN ("redraw-display", Fredraw_display, Sredraw_display, 0, 0, 0,
+DEFUN ("redraw-display", Fredraw_display, Sredraw_display, 0, 0, "",
   "Clear screen and output again what is supposed to appear on it.")
   ()
 {