--- a/MethodSelectionBrowser.st Wed May 13 14:35:02 1998 +0200
+++ b/MethodSelectionBrowser.st Wed May 13 14:38:36 1998 +0200
@@ -88,26 +88,34 @@
!MethodSelectionBrowser class methodsFor:'list specs'!
-resourceMethodColumns
- "returns the columns for the table of the resource methods"
+tableColumnsForResourceMethods
+ "This resource specification was automatically generated
+ by the DataSetBuilder of ST/X."
- ^ #(
- #(#DataSetColumnSpec
- #label: ' Selector'
- #'labelAlignment:' #left
- #model: #selector
- #canSelect: false
- )
- (#DataSetColumnSpec
- #label: ' Protocol'
- #'labelAlignment:' #left
- #model: #protocol
- #canSelect: false
- ))
+ "Do not manually edit this!! If it is corrupted,
+ the DataSetBuilder may not be able to read the specification."
+
+ "
+ DataSetBuilder new openOnClass:MethodSelectionBrowser andSelector:#tableColumnsForResourceMethods
+ "
+
+ <resource: #tableColumns>
-
-
+ ^ #(
+ #(#DataSetColumnSpec
+ #label: ' Selector'
+ #labelAlignment: #left
+ #model: #selector
+ #canSelect: false
+ )
+ #(#DataSetColumnSpec
+ #label: ' Protocol'
+ #labelAlignment: #left
+ #model: #protocol
+ #canSelect: false
+ )
+ )
! !
!MethodSelectionBrowser methodsFor:'aspects'!