--- a/BrowserView.st Tue May 21 16:45:57 1996 +0200
+++ b/BrowserView.st Wed May 22 13:38:01 1996 +0200
@@ -3991,7 +3991,9 @@
!
methodCategoryCreateAccessMethods
- "create access methods for all instvars"
+ "create access methods for instvars.
+ If no variable is selected, for all instvars;
+ otherwise for that selected instvar."
self checkClassSelected ifFalse:[^ self].
@@ -4028,7 +4030,7 @@
self updateMethodListWithScroll:false
]
- "Modified: 18.5.1996 / 15:38:15 / cg"
+ "Modified: 22.5.1996 / 13:36:59 / cg"
!
methodCategoryCreateDocumentationMethods
@@ -7067,6 +7069,6 @@
!BrowserView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.135 1996-05-21 12:37:46 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.136 1996-05-22 11:38:01 cg Exp $'
! !
BrowserView initialize!
--- a/BrwsrView.st Tue May 21 16:45:57 1996 +0200
+++ b/BrwsrView.st Wed May 22 13:38:01 1996 +0200
@@ -3991,7 +3991,9 @@
!
methodCategoryCreateAccessMethods
- "create access methods for all instvars"
+ "create access methods for instvars.
+ If no variable is selected, for all instvars;
+ otherwise for that selected instvar."
self checkClassSelected ifFalse:[^ self].
@@ -4028,7 +4030,7 @@
self updateMethodListWithScroll:false
]
- "Modified: 18.5.1996 / 15:38:15 / cg"
+ "Modified: 22.5.1996 / 13:36:59 / cg"
!
methodCategoryCreateDocumentationMethods
@@ -7067,6 +7069,6 @@
!BrowserView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.135 1996-05-21 12:37:46 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.136 1996-05-22 11:38:01 cg Exp $'
! !
BrowserView initialize!