checkin from browser
authortz
Wed, 13 May 1998 14:41:34 +0200
changeset 822 be574ef48217
parent 821 950e6fbbc1f0
child 823 47e7d348e01a
checkin from browser
ResourceSelectionBrowser.st
--- 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
 !