diff --git a/src/gemini-viewer.lisp b/src/gemini-viewer.lisp
index db204c3..d70ef84 100644
--- a/src/gemini-viewer.lisp
+++ b/src/gemini-viewer.lisp
@@ -542,6 +542,7 @@
         (when suggested-message-index
           (select-row object suggested-message-index))
         (when redraw
+          (win-clear object)
           (draw object))))))
 
 ;; (defmethod draw :before ((object gemini-streams-window))