--- a/ApplicationModel.st Tue Jul 23 17:38:05 2013 +0200
+++ b/ApplicationModel.st Tue Jul 23 19:53:23 2013 +0200
@@ -1276,6 +1276,7 @@
builder window label:aString
! !
+
!ApplicationModel methodsFor:'binding access'!
actionFor:aKey
@@ -1977,32 +1978,6 @@
!ApplicationModel methodsFor:'easy bindings'!
-aspectAdaptorFor: aSymbolOrCollectionOfThose on:aValueModel
-
- | adaptor path |
-
- path := aSymbolOrCollectionOfThose isSymbol
- ifTrue:[Array with: aSymbolOrCollectionOfThose]
- ifFalse:[aSymbolOrCollectionOfThose].
- adaptor := aValueModel.
- path do:
- [:selector|
- adaptor := (AspectAdaptor forAspect: selector)
- subjectChannel: adaptor].
- ^adaptor
-
- "Created: / 09-03-2010 / 08:44:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 17-03-2010 / 19:28:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
-aspectAt:aSymbol ifAbsentPut:aBlock
-
- builder ifNil:[self createBuilder].
- ^builder bindings at: aSymbol ifAbsentPut: aBlock
-
- "Created: / 09-03-2010 / 08:37:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
registerInterestIn:aValueModel using:aSelectorOrArray
"Register interest in a change in aValueModel using information in aSelectorOrArray.
aSelectorOrArray can be one of three things:
@@ -3967,6 +3942,15 @@
editor window if supported."
!
+processShortcut:aKeyEvent
+ "a shortcut key event as forwarded from the keyboardProcessor - if there is the
+ shortcut key defined, process the shortcut and return true - otherwise false."
+
+ ^false
+
+ "Created: / 23-07-2013 / 18:10:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
requestForWindowClose
"the applicationWindow wants to know, if a close
is ok. Return false if not."
@@ -4010,11 +3994,11 @@
!ApplicationModel class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.341 2013-07-08 09:49:38 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.342 2013-07-23 17:53:23 vrany Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.341 2013-07-08 09:49:38 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.342 2013-07-23 17:53:23 vrany Exp $'
! !