#DOCUMENTATION by cg
authorClaus Gittinger <cg@exept.de>
Thu, 31 Aug 2017 20:18:52 +0200
changeset 8150 459bd59e8137
parent 8149 cda2dc8052e7
child 8151 80ee730c9073
#DOCUMENTATION by cg class: View comment/format in: #aspectMessage: #change: #changeMessage: #menu: #menuMessage:
View.st
--- a/View.st	Thu Aug 31 20:16:25 2017 +0200
+++ b/View.st	Thu Aug 31 20:18:52 2017 +0200
@@ -312,7 +312,7 @@
 !
 
 menuMessage:aSymbol
-    "ST-80 style menus: If a views menuSymbol is nonNil, it
+    "ST-80 style menus: If a view's menuSymbol is nonNil, it
      will send it to its model when the middleButton is pressed.
      That method should return nil or the menu to be shown.
      This is useful for very dynamic menus, where it does not
@@ -320,6 +320,8 @@
      This is the same as #menu: which was added for ST-80 compatibility."
 
     menuMsg := aSymbol
+
+    "Modified (comment): / 31-08-2017 / 20:18:40 / cg"
 !
 
 menuPerformer
@@ -414,18 +416,22 @@
 !
 
 aspectMessage:aspectSymbol
-    "ST-80 style updating: If a views aspectSymbol is nonNil, 
+    "ST-80 style updating: If a view's aspectSymbol is nonNil, 
      it will respond to changes of this aspect from the model."
 
     aspectMsg := aspectSymbol
+
+    "Modified (comment): / 31-08-2017 / 20:18:12 / cg"
 !
 
 change:changeSymbol
-    "ST-80 style change notification: If a views changeSymbol is nonNil, 
+    "ST-80 style change notification: If a view's changeSymbol is nonNil, 
      it will send it to its model when something changes.
      Alias for changeMessage: for ST-80 compatibility."
 
     self changeMessage:changeSymbol
+
+    "Modified (comment): / 31-08-2017 / 20:18:15 / cg"
 !
 
 changeMessage
@@ -435,11 +441,13 @@
 !
 
 changeMessage:aSymbol
-    "ST-80 style change notification: If a views changeSymbol is nonNil, 
+    "ST-80 style change notification: If a view's changeSymbol is nonNil, 
      it will send it to its model when something changes.
      This is the same as change: which was added for ST-80 compatibility."
 
     changeMsg := aSymbol
+
+    "Modified (comment): / 31-08-2017 / 20:18:18 / cg"
 !
 
 controller:aController
@@ -452,7 +460,7 @@
 !
 
 menu:menuSymbol
-    "ST-80 style menus: If a views menuSymbol is nonNil, it
+    "ST-80 style menus: If a view's menuSymbol is nonNil, it
      will send it to its model when the middleButton is pressed.
      That method should return nil or the menu to be shown.
      This is useful for very dynamic menus, where it does not
@@ -460,6 +468,8 @@
      Alias for #menuMessage:, for ST-80 compatibility."
 
     menuMsg := menuSymbol
+
+    "Modified (comment): / 31-08-2017 / 20:18:24 / cg"
 !
 
 model