UISelectionPanel.st
changeset 2506 b85f4799add5
parent 2498 ca273c14b7bf
child 2517 0b6a4dedf64b
equal deleted inserted replaced
2505:2d43dbc0e86c 2506:b85f4799add5
   122                             #('Text'    standardTexts)
   122                             #('Text'    standardTexts)
   123                             #('Lists'   standardLists)
   123                             #('Lists'   standardLists)
   124                             #('Trees'   standardTrees)
   124                             #('Trees'   standardTrees)
   125                             #('Groups'  standardGroups)
   125                             #('Groups'  standardGroups)
   126                             #('Embed'       standardEmbed)
   126                             #('Embed'       standardEmbed)
   127 "/                            #('Geometric'   standardMorphs1)
   127                             #('Geometric'   standardMorphs1)
   128                             #('Misc'    standardMisc)
   128                             #('Misc'    standardMisc)
   129                          )
   129                          )
   130          )
   130          )
   131 
   131 
   132         #( 'Clipboard'  #(
   132         #( 'Clipboard'  #(
  1088        (SpecCollection
  1088        (SpecCollection
  1089           collection: (
  1089           collection: (
  1090            (ArcMorphSpec
  1090            (ArcMorphSpec
  1091               name: 'Circle'
  1091               name: 'Circle'
  1092               layout: (LayoutFrame 3 0 3 0 63 0 63 0)
  1092               layout: (LayoutFrame 3 0 3 0 63 0 63 0)
  1093               lineColor: (Color 100.0 0 0)
  1093               lineColor: (Color 100.0 0.0 0.0)
  1094             )
  1094             )
  1095            (ArcMorphSpec
  1095            (ArcMorphSpec
  1096               name: 'Arc1'
  1096               name: 'Arc1'
  1097               layout: (LayoutFrame 3 0 70 0 63 0 133 0)
  1097               layout: (LayoutFrame 3 0 70 0 63 0 133 0)
  1098               lineColor: (Color 100.0 0 0)
  1098               lineColor: (Color 100.0 0.0 0.0)
  1099               startAngle: -45
  1099               startAngle: -45
  1100               sweepAngle: 270
  1100               sweepAngle: 270
  1101             )
  1101             )
  1102            (ArcMorphSpec
  1102            (ArcMorphSpec
  1103               name: 'Arc2'
  1103               name: 'Arc2'
  1104               layout: (LayoutFrame 3 0 143 0 63 0 206 0)
  1104               layout: (LayoutFrame 3 0 143 0 63 0 206 0)
  1105               lineColor: (Color 100.0 0 0)
  1105               lineColor: (Color 100.0 0.0 0.0)
  1106               startAngle: -45
  1106               startAngle: -45
  1107               sweepAngle: 270
  1107               sweepAngle: 270
  1108               closePath: true
  1108               closePath: true
  1109             )
  1109             )
  1110            (ArcMorphSpec
  1110            (ArcMorphSpec
  1111               name: 'Pie'
  1111               name: 'Pie'
  1112               layout: (LayoutFrame 3 0 213 0 63 0 276 0)
  1112               layout: (LayoutFrame 3 0 213 0 63 0 276 0)
  1113               lineColor: (Color 100.0 0 0)
  1113               lineColor: (Color 100.0 0.0 0.0)
  1114               startAngle: -45
  1114               startAngle: -45
  1115               sweepAngle: 270
  1115               sweepAngle: 270
  1116               pie: true
  1116               pie: true
  1117             )
  1117             )
  1118 
       
  1119            (ArcMorphSpec
  1118            (ArcMorphSpec
  1120               name: 'FilledCircle'
  1119               name: 'FilledCircle'
  1121               layout: (LayoutFrame 70 0 3 0 133 0 63 0)
  1120               layout: (LayoutFrame 70 0 3 0 133 0 63 0)
  1122               foregroundColor: (Color 100.0 100.0 0)
  1121               foregroundColor: (Color 100.0 100.0 0.0)
  1123               fill: true
  1122               fill: true
  1124             )
  1123             )
  1125 "/           (ArcMorphSpec
       
  1126 "/              name: 'FilledArc1'
       
  1127 "/              layout: (LayoutFrame 70 0 70 0 133 0 133 0)
       
  1128 "/              foregroundColor: (Color 100.0 100.0 0)
       
  1129 "/              startAngle: -45
       
  1130 "/              sweepAngle: 270
       
  1131 "/              fill: true
       
  1132 "/            )
       
  1133            (ArcMorphSpec
  1124            (ArcMorphSpec
  1134               name: 'FilledArc2'
  1125               name: 'FilledArc2'
  1135               layout: (LayoutFrame 70 0 143 0 133 0 206 0)
  1126               layout: (LayoutFrame 70 0 143 0 133 0 206 0)
  1136               foregroundColor: (Color 100.0 100.0 0)
  1127               foregroundColor: (Color 100.0 100.0 0.0)
       
  1128               fill: true
  1137               startAngle: -45
  1129               startAngle: -45
  1138               sweepAngle: 270
  1130               sweepAngle: 270
  1139               fill: true
       
  1140               closePath: true
  1131               closePath: true
  1141             )
  1132             )
  1142            (ArcMorphSpec
  1133            (ArcMorphSpec
  1143               name: 'FilledPie'
  1134               name: 'FilledPie'
  1144               layout: (LayoutFrame 70 0 213 0 133 0 276 0)
  1135               layout: (LayoutFrame 70 0 213 0 133 0 276 0)
  1145               foregroundColor: (Color 100.0 100.0 0)
  1136               foregroundColor: (Color 100.0 100.0 0.0)
       
  1137               fill: true
  1146               startAngle: -45
  1138               startAngle: -45
  1147               sweepAngle: 270
  1139               sweepAngle: 270
  1148               fill: true
       
  1149               pie: true
  1140               pie: true
  1150             )
  1141             )
  1151 
       
  1152            (ArcMorphSpec
  1142            (ArcMorphSpec
  1153               name: 'FilledCircleL'
  1143               name: 'FilledCircleL'
  1154               layout: (LayoutFrame 143 0 3 0 206 0 63 0)
  1144               layout: (LayoutFrame 143 0 3 0 206 0 63 0)
  1155               lineColor: (Color 100.0 0 0)
  1145               foregroundColor: (Color 100.0 100.0 0.0)
  1156               foregroundColor: (Color 100.0 100.0 0)
       
  1157               fill: true
  1146               fill: true
       
  1147               lineColor: (Color 100.0 0.0 0.0)
  1158             )
  1148             )
  1159            (ArcMorphSpec
  1149            (ArcMorphSpec
  1160               name: 'FilledArc1L'
  1150               name: 'FilledArc1L'
  1161               layout: (LayoutFrame 143 0 70 0 206 0 133 0)
  1151               layout: (LayoutFrame 143 0 70 0 206 0 133 0)
  1162               lineColor: (Color 100.0 0 0)
  1152               foregroundColor: (Color 100.0 100.0 0.0)
  1163               foregroundColor: (Color 100.0 100.0 0)
  1153               fill: true
       
  1154               lineColor: (Color 100.0 0.0 0.0)
  1164               startAngle: -45
  1155               startAngle: -45
  1165               sweepAngle: 270
  1156               sweepAngle: 270
  1166               fill: true
       
  1167             )
  1157             )
  1168            (ArcMorphSpec
  1158            (ArcMorphSpec
  1169               name: 'FilledArc2L'
  1159               name: 'FilledArc2L'
  1170               layout: (LayoutFrame 143 0 143 0 206 0 206 0)
  1160               layout: (LayoutFrame 143 0 143 0 206 0 206 0)
  1171               lineColor: (Color 100.0 0 0)
  1161               foregroundColor: (Color 100.0 100.0 0.0)
  1172               foregroundColor: (Color 100.0 100.0 0)
  1162               fill: true
       
  1163               lineColor: (Color 100.0 0.0 0.0)
  1173               startAngle: -45
  1164               startAngle: -45
  1174               sweepAngle: 270
  1165               sweepAngle: 270
  1175               fill: true
       
  1176               closePath: true
  1166               closePath: true
  1177             )
  1167             )
  1178            (ArcMorphSpec
  1168            (ArcMorphSpec
  1179               name: 'FilledPieL'
  1169               name: 'FilledPieL'
  1180               layout: (LayoutFrame 143 0 213 0 206 0 276 0)
  1170               layout: (LayoutFrame 143 0 213 0 206 0 276 0)
  1181               lineColor: (Color 100.0 0 0)
  1171               foregroundColor: (Color 100.0 100.0 0.0)
  1182               foregroundColor: (Color 100.0 100.0 0)
  1172               fill: true
       
  1173               lineColor: (Color 100.0 0.0 0.0)
  1183               startAngle: -45
  1174               startAngle: -45
  1184               sweepAngle: 270
  1175               sweepAngle: 270
  1185               fill: true
       
  1186               pie: true
  1176               pie: true
  1187             )
  1177             )
  1188 
       
  1189            (ArcMorphSpec
  1178            (ArcMorphSpec
  1190               name: 'FilledCircleLB'
  1179               name: 'FilledCircleLB'
  1191               layout: (LayoutFrame 213 0 3 0 276 0 63 0)
  1180               layout: (LayoutFrame 213 0 3 0 276 0 63 0)
  1192               lineColor: (Color 100.0 0 0)
  1181               foregroundColor: (Color 100.0 100.0 0.0)
  1193               foregroundColor: (Color 100.0 100.0 0)
  1182               backgroundColor: (Color 0.0 100.0 0.0)
  1194               backgroundColor: (Color 0 100.0 0)
       
  1195               fill: true
  1183               fill: true
       
  1184               lineColor: (Color 100.0 0.0 0.0)
  1196             )
  1185             )
  1197            (ArcMorphSpec
  1186            (ArcMorphSpec
  1198               name: 'FilledArc1LB'
  1187               name: 'FilledArc1LB'
  1199               layout: (LayoutFrame 213 0 70 0 276 0 133 0)
  1188               layout: (LayoutFrame 213 0 70 0 276 0 133 0)
  1200               lineColor: (Color 100.0 0 0)
  1189               foregroundColor: (Color 100.0 100.0 0.0)
  1201               foregroundColor: (Color 100.0 100.0 0)
  1190               backgroundColor: (Color 0.0 100.0 0.0)
  1202               backgroundColor: (Color 0 100.0 0)
  1191               fill: true
       
  1192               lineColor: (Color 100.0 0.0 0.0)
  1203               startAngle: -45
  1193               startAngle: -45
  1204               sweepAngle: 270
  1194               sweepAngle: 270
  1205               fill: true
       
  1206             )
  1195             )
  1207            (ArcMorphSpec
  1196            (ArcMorphSpec
  1208               name: 'FilledArc2LB'
  1197               name: 'FilledArc2LB'
  1209               layout: (LayoutFrame 213 0 143 0 276 0 206 0)
  1198               layout: (LayoutFrame 213 0 143 0 276 0 206 0)
  1210               lineColor: (Color 100.0 0 0)
  1199               foregroundColor: (Color 100.0 100.0 0.0)
  1211               foregroundColor: (Color 100.0 100.0 0)
  1200               backgroundColor: (Color 0.0 100.0 0.0)
  1212               backgroundColor: (Color 0 100.0 0)
  1201               fill: true
       
  1202               lineColor: (Color 100.0 0.0 0.0)
  1213               startAngle: -45
  1203               startAngle: -45
  1214               sweepAngle: 270
  1204               sweepAngle: 270
  1215               fill: true
       
  1216               closePath: true
  1205               closePath: true
  1217             )
  1206             )
  1218            (ArcMorphSpec
  1207            (ArcMorphSpec
  1219               name: 'FilledPieLB'
  1208               name: 'FilledPieLB'
  1220               layout: (LayoutFrame 213 0 213 0 276 0 276 0)
  1209               layout: (LayoutFrame 213 0 213 0 276 0 276 0)
  1221               lineColor: (Color 100.0 0 0)
  1210               foregroundColor: (Color 100.0 100.0 0.0)
  1222               foregroundColor: (Color 100.0 100.0 0)
  1211               backgroundColor: (Color 0.0 100.0 0.0)
  1223               backgroundColor: (Color 0 100.0 0)
  1212               fill: true
       
  1213               lineColor: (Color 100.0 0.0 0.0)
  1224               startAngle: -45
  1214               startAngle: -45
  1225               sweepAngle: 270
  1215               sweepAngle: 270
       
  1216               pie: true
       
  1217             )
       
  1218            (RectangleMorphSpec
       
  1219               name: 'RectangleMorph1'
       
  1220               layout: (LayoutFrame 283 0 3 0 346 0 63 0)
       
  1221               foregroundColor: (Color 100.0 100.0 0.0)
       
  1222               backgroundColor: (Color 0.0 100.0 0.0)
       
  1223               fill: false
       
  1224               lineColor: (Color 100.0 0.0 0.0)
       
  1225             )
       
  1226            (RectangleMorphSpec
       
  1227               name: 'RectangleMorph2'
       
  1228               layout: (LayoutFrame 283 0 70 0 346 0 130 0)
       
  1229               foregroundColor: (Color 100.0 100.0 0.0)
       
  1230               backgroundColor: (Color 0.0 100.0 0.0)
  1226               fill: true
  1231               fill: true
  1227               pie: true
  1232               lineColor: (Color 100.0 0.0 0.0)
  1228             )
  1233             )
  1229 
       
  1230            )
  1234            )
  1231          
  1235          
  1232         )
  1236         )
  1233       )
  1237       )
  1234 !
  1238 !