--- a/VDBThreadGroupPresenter.st	Sun Sep 21 23:46:10 2014 +0100
+++ b/VDBThreadGroupPresenter.st	Mon Sep 22 09:57:54 2014 +0100
@@ -7,12 +7,16 @@
 	category:'VDB-Presentation'
 !
 
-!VDBThreadGroupPresenter methodsFor:'displaying'!
+!VDBThreadGroupPresenter methodsFor:'accessing'!
 
-displayString
+label
     ^ threadGroup displayString
 
-    "Created: / 21-09-2014 / 23:31:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Created: / 22-09-2014 / 00:14:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+threadGroup
+    ^ threadGroup
 ! !
 
 !VDBThreadGroupPresenter methodsFor:'initialization'!
@@ -36,3 +40,11 @@
     "Created: / 21-09-2014 / 23:41:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!VDBThreadGroupPresenter methodsFor:'testing'!
+
+isThreadGroupPresenter
+    ^ true
+
+    "Created: / 21-09-2014 / 23:54:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+