equal
deleted
inserted
replaced
2952 "generate list of supported editor types" |
2952 "generate list of supported editor types" |
2953 |
2953 |
2954 |list| |
2954 |list| |
2955 |
2955 |
2956 (list := builder bindingAt:#editorTypeList) isNil ifTrue:[ |
2956 (list := builder bindingAt:#editorTypeList) isNil ifTrue:[ |
2957 list := (DataSetColumnSpec slices collect:[:eachSlice | eachSlice at:1]) asSet. |
2957 list := DataSetColumnSpec slices collect:[:eachSlice | eachSlice at:1] as:Set. |
2958 list := list asOrderedCollection sort. |
2958 list := list asOrderedCollection sort. |
2959 builder aspectAt:#editorTypeList put:list |
2959 builder aspectAt:#editorTypeList put:list |
2960 ]. |
2960 ]. |
2961 ^list |
2961 ^list |
2962 ! |
2962 ! |
2994 "generate list of supported renderer types" |
2994 "generate list of supported renderer types" |
2995 |
2995 |
2996 |list| |
2996 |list| |
2997 |
2997 |
2998 (list := builder bindingAt:#rendererTypeList) isNil ifTrue:[ |
2998 (list := builder bindingAt:#rendererTypeList) isNil ifTrue:[ |
2999 list := (DataSetColumnSpec slices collect:[:eachSlice | eachSlice at:2]) asSet. |
2999 list := DataSetColumnSpec slices collect:[:eachSlice | eachSlice at:2] as:Set. |
3000 list := list asOrderedCollection sort. |
3000 list := list asOrderedCollection sort. |
3001 builder aspectAt:#rendererTypeList put:list |
3001 builder aspectAt:#rendererTypeList put:list |
3002 ]. |
3002 ]. |
3003 ^list |
3003 ^list |
3004 ! |
3004 ! |