Mercurial Mercurial > hg > stx-libwidg / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
comment
authorClaus Gittinger <cg@exept.de>
Wed, 05 Jun 1996 17:09:57 +0200
changeset 754 4db5b854cc88
parent 753 40b85851bffb
child 755 250f35a7d83a
comment
PopUpMenu.st file | annotate | diff | comparison | revisions
ScrView.st file | annotate | diff | comparison | revisions
ScrollableView.st file | annotate | diff | comparison | revisions 
--- a/PopUpMenu.st	Wed Jun 05 17:08:06 1996 +0200
+++ b/PopUpMenu.st	Wed Jun 05 17:09:57 1996 +0200
@@ -1010,15 +1010,19 @@
 !PopUpMenu methodsFor:'accessing-mvc'!
 
 changeMessage
-    "forward from my menu"
+    "set the changeMessage from my menu"
 
     ^ menuView changeMessage
+
+    "Modified: 5.6.1996 / 17:08:52 / cg"
 !
 
 changeMessage:aSymbol
-    "forward to my menu"
+    "set the changeMessage - forward to my menu"
 
     menuView changeMessage:aSymbol
+
+    "Modified: 5.6.1996 / 17:08:41 / cg"
 !
 
 model 
@@ -1030,7 +1034,11 @@
 !
 
 model:aModel
+    "set the model - forwarded to my menuViews"
+
     menuView model:aModel
+
+    "Modified: 5.6.1996 / 17:08:30 / cg"
 ! !
 
 !PopUpMenu methodsFor:'deactivation'!
@@ -1267,5 +1275,5 @@
 !PopUpMenu class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.55 1996-06-05 15:08:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.56 1996-06-05 15:09:02 cg Exp $'
 ! !
--- a/ScrView.st	Wed Jun 05 17:08:06 1996 +0200
+++ b/ScrView.st	Wed Jun 05 17:09:57 1996 +0200
@@ -950,15 +950,21 @@
 !
 
 model
+    "return my scrolledViews model"
+
     ^ scrolledView model
 
     "Created: 20.4.1996 / 13:27:25 / cg"
+    "Modified: 5.6.1996 / 14:17:04 / cg"
 !
 
 model:aModel
+    "forward model change to my scrolledViews"
+
     ^ scrolledView model:aModel
 
     "Created: 20.4.1996 / 13:27:33 / cg"
+    "Modified: 5.6.1996 / 17:09:50 / cg"
 !
 
 rightButtonMenu
@@ -977,5 +983,5 @@
 !ScrollableView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ScrView.st,v 1.35 1996-05-29 10:20:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ScrView.st,v 1.36 1996-06-05 15:09:57 cg Exp $'
 ! !
--- a/ScrollableView.st	Wed Jun 05 17:08:06 1996 +0200
+++ b/ScrollableView.st	Wed Jun 05 17:09:57 1996 +0200
@@ -950,15 +950,21 @@
 !
 
 model
+    "return my scrolledViews model"
+
     ^ scrolledView model
 
     "Created: 20.4.1996 / 13:27:25 / cg"
+    "Modified: 5.6.1996 / 14:17:04 / cg"
 !
 
 model:aModel
+    "forward model change to my scrolledViews"
+
     ^ scrolledView model:aModel
 
     "Created: 20.4.1996 / 13:27:33 / cg"
+    "Modified: 5.6.1996 / 17:09:50 / cg"
 !
 
 rightButtonMenu
@@ -977,5 +983,5 @@
 !ScrollableView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.35 1996-05-29 10:20:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.36 1996-06-05 15:09:57 cg Exp $'
 ! !
hg/stx-libwidg