--- a/ResourceSelectionBrowser.st Wed May 13 14:38:36 1998 +0200
+++ b/ResourceSelectionBrowser.st Wed May 13 14:41:34 1998 +0200
@@ -386,7 +386,7 @@
!ResourceSelectionBrowser class methodsFor:'list specs'!
-tableColumnsForResourceMethods
+tableColumnsForResourceMethodAttributes
"This resource specification was automatically generated
by the DataSetBuilder of ST/X."
@@ -394,7 +394,7 @@
the DataSetBuilder may not be able to read the specification."
"
- DataSetBuilder new openOnClass:ResourceSelectionBrowser andSelector:#tableColumnsForResourceMethods
+ DataSetBuilder new openOnClass:ResourceSelectionBrowser andSelector:#tableColumnsForResourceMethodAttributes
"
<resource: #tableColumns>
@@ -446,7 +446,7 @@
|holder|
(holder := builder bindingAt:#resourceMethodColumns) isNil ifTrue:[
builder aspectAt:#resourceMethodColumns put:(holder := List new).
- holder addAll: (self class tableColumnsForResourceMethods collect: [:i| i decodeAsLiteralArray]).
+ holder addAll: (self class tableColumnsForResourceMethodAttributes collect: [:i| i decodeAsLiteralArray]).
].
^ holder
!