--- ../panes.lisp	2005-08-25 23:22:10.707485936 +0200
+++ panes.lisp	2005-08-25 23:22:42.947584696 +0200
@@ -2603,7 +2603,9 @@
         (let ((queue (frame-event-queue frame)))
           (loop for event = (event-queue-read queue)
             ;; EVENT-QUEUE-READ in single-process mode calls PROCESS-NEXT-EVENT itself.
-            do (handle-event (event-sheet event) event)))
+            do (progn 
+                 (handle-event (event-sheet event) event)
+                 (redisplay-frame-panes frame))))
       (frame-exit () (disown-frame (frame-manager frame) frame)))))
 
 ;;; These below were just hot fixes, are there still needed? Are even