--- a/ApplicationModel.st Sun Jun 03 09:28:17 2018 +0200
+++ b/ApplicationModel.st Mon Jun 04 15:51:09 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1995 by Claus Gittinger
All Rights Reserved
@@ -1627,7 +1625,7 @@
aspectFor:aKey
"sent by the builder to ask for an aspect (a data model).
The argument, aKey comes from an UI-spec
- for a components #aspect property.
+ for a component's #aspect property.
Here, a corresponding message is sent to myself,
which ought to be defined in the application subclass.
Alternatively, a subclass may redefine this method, to provide
@@ -1637,13 +1635,14 @@
aKey isNil ifTrue:[ self error:'nil aspect key' ].
masterApplication notNil ifTrue:[
- (self respondsTo:aKey) ifFalse:[
- ^ masterApplication aspectFor:aKey
- ].
+ (self respondsTo:aKey) ifFalse:[
+ ^ masterApplication aspectFor:aKey
+ ].
].
^ self perform:aKey
- "Modified: / 18.6.1998 / 20:33:23 / cg"
+ "Modified: / 18-06-1998 / 20:33:23 / cg"
+ "Modified (comment): / 04-06-2018 / 13:38:27 / Claus Gittinger"
!
aspectOrNil:aKey forSubApplication:aSubApp
@@ -2817,7 +2816,7 @@
!
postOpenDialogWith:aBuilder
- "this is sent after the applicationÄs window is opened as a dialog with me
+ "this is sent after the applicationÄs window is opened as a dialog with me
as a source (for aspects) i.e. via openDialogInterface:.
Can be redefined in subclasses for actions after opening a dialog view."