DataSetBuilder.st
changeset 1699 e68392bc2d52
parent 1697 50a84654ab9b
child 1700 0d1a8ef95754
equal deleted inserted replaced
1698:28250498a2b3 1699:e68392bc2d52
  2083 
  2083 
  2084     |list|
  2084     |list|
  2085 
  2085 
  2086     (list := builder bindingAt:#editorTypeList) isNil ifTrue:[
  2086     (list := builder bindingAt:#editorTypeList) isNil ifTrue:[
  2087         list := (DataSetColumnSpec slices collect:[:eachSlice | eachSlice at:1]) asSet.
  2087         list := (DataSetColumnSpec slices collect:[:eachSlice | eachSlice at:1]) asSet.
       
  2088         list := list asOrderedCollection sort:[:a :b | a name < b name].
  2088         builder aspectAt:#editorTypeList put:list
  2089         builder aspectAt:#editorTypeList put:list
  2089     ].
  2090     ].
  2090     ^list
  2091     ^list
  2091 !
  2092 !
  2092 
  2093