--- a/VDBAbstractApplication.st	Sun Mar 08 15:50:52 2015 +0000
+++ b/VDBAbstractApplication.st	Thu Jun 01 12:23:04 2017 +0100
@@ -1,5 +1,7 @@
 "{ Package: 'jv:vdb' }"
 
+"{ NameSpace: Smalltalk }"
+
 ApplicationModel subclass:#VDBAbstractApplication
 	instanceVariableNames:'debuggerHolder debugger titleHolder'
 	classVariableNames:''
@@ -8,6 +10,14 @@
 !
 
 
+!VDBAbstractApplication class methodsFor:'accessing'!
+
+windowTitle
+    ^ ((self windowSpec at: 5) at: 3)
+
+    "Created: / 01-06-2017 / 12:13:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !VDBAbstractApplication class methodsFor:'interface opening'!
 
 openFor: debugger
@@ -18,6 +28,14 @@
     "Created: / 06-06-2014 / 21:35:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!VDBAbstractApplication class methodsFor:'interface specs'!
+
+windowSpec 
+    self subclassResponsibility
+
+    "Created: / 01-06-2017 / 12:14:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !VDBAbstractApplication class methodsFor:'plugin spec'!
 
 aspectSelectors
@@ -104,11 +122,11 @@
     "return/create the 'titleHolder' value holder (automatically generated)"
 
     titleHolder isNil ifTrue:[
-        titleHolder := ValueHolder with: ((self class windowSpec at: 5) at: 3)
+        titleHolder := ValueHolder with: self class windowTitle
     ].
     ^ titleHolder
 
-    "Modified: / 10-06-2014 / 14:50:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 01-06-2017 / 12:13:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !VDBAbstractApplication methodsFor:'change & update'!