--- a/Tools__TestRunnerMini.st	Sun May 29 20:45:29 2016 +0200
+++ b/Tools__TestRunnerMini.st	Mon May 30 09:33:24 2016 +0200
@@ -532,6 +532,7 @@
     "/ debug run is synchronous
     [
         self runningHolder value:true.
+        self windowGroup repairDamage.
 
         suite tests do:[:test |
             [
@@ -555,7 +556,8 @@
                     result failureOutcomes add: test.
                     resultHolder value:suiteAndResult; changed.    
                 ]
-            ]
+            ].
+            self windowGroup repairDamage
         ].
     ] ensure:[
         self runningHolder value:false.
@@ -660,7 +662,8 @@
                                 self progressHolder value:(incr * run) truncated "rounded".
                                 infoHolder notNil ifTrue:[
                                     infoHolder value:('Done.')
-                                ]
+                                ].
+                                resultHolder setValue:nil; value:suiteAndResult; changed.
                             ]
                             debug: debug.
                 suiteAndResult := SuiteAndResult suite:suite result:result.