Refactoring:
replace asSet copy by asNewSet (same for IdentitySet)
replace (xxx collect:[]) asSet by (xxx collect:[] as:Set)
replace (xxx select:[]) asSet by (xxx select:[] as:Set)
--- a/DataSetBuilder.st Mon Mar 25 13:14:03 2013 +0100
+++ b/DataSetBuilder.st Tue Apr 02 11:32:49 2013 +0200
@@ -2954,7 +2954,7 @@
|list|
(list := builder bindingAt:#editorTypeList) isNil ifTrue:[
- list := (DataSetColumnSpec slices collect:[:eachSlice | eachSlice at:1]) asSet.
+ list := DataSetColumnSpec slices collect:[:eachSlice | eachSlice at:1] as:Set.
list := list asOrderedCollection sort.
builder aspectAt:#editorTypeList put:list
].
@@ -2996,7 +2996,7 @@
|list|
(list := builder bindingAt:#rendererTypeList) isNil ifTrue:[
- list := (DataSetColumnSpec slices collect:[:eachSlice | eachSlice at:2]) asSet.
+ list := DataSetColumnSpec slices collect:[:eachSlice | eachSlice at:2] as:Set.
list := list asOrderedCollection sort.
builder aspectAt:#rendererTypeList put:list
].