--- a/VDBThreadPresenter.st	Mon Sep 29 23:59:11 2014 +0100
+++ b/VDBThreadPresenter.st	Tue Sep 30 00:32:42 2014 +0100
@@ -46,10 +46,11 @@
      *** to optimize: redefine by subClass"
 
      thread isDead ifTrue:[ ^ #() ].
+     thread isRunning ifTrue:[ ^ #() ].
      ^ thread stack collect:[ :f | VDBFramePresenter new setFrame: f; parent: self ]
 
     "Created: / 21-09-2014 / 23:42:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 22-09-2014 / 00:54:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 30-09-2014 / 00:04:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !VDBThreadPresenter methodsFor:'testing'!