diff -r d2afdbaaabdb -r d766d4c854a2 VDBAbstractApplication.st --- 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 " +! ! + !VDBAbstractApplication class methodsFor:'interface opening'! openFor: debugger @@ -18,6 +28,14 @@ "Created: / 06-06-2014 / 21:35:50 / Jan Vrany " ! ! +!VDBAbstractApplication class methodsFor:'interface specs'! + +windowSpec + self subclassResponsibility + + "Created: / 01-06-2017 / 12:14:05 / Jan Vrany " +! ! + !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 " + "Modified: / 01-06-2017 / 12:13:26 / Jan Vrany " ! ! !VDBAbstractApplication methodsFor:'change & update'!