equal
deleted
inserted
replaced
1077 lbl := resources string:eachItem label. |
1077 lbl := resources string:eachItem label. |
1078 (eachItem choiceValue ? #default) ~~ #default ifTrue:[ |
1078 (eachItem choiceValue ? #default) ~~ #default ifTrue:[ |
1079 clr := Color perform:eachItem choiceValue. |
1079 clr := Color perform:eachItem choiceValue. |
1080 labelWithColor := lbl asText backgroundColorizeAllWith:clr. |
1080 labelWithColor := lbl asText backgroundColorizeAllWith:clr. |
1081 clr brightness < 0.5 ifTrue:[ |
1081 clr brightness < 0.5 ifTrue:[ |
1082 labelWithColor := labelWithColor colorizeAllWith:Color white. |
1082 labelWithColor := labelWithColor withColor:Color white. |
1083 ]. |
1083 ]. |
1084 eachItem label:labelWithColor. |
1084 eachItem label:labelWithColor. |
1085 ]. |
1085 ]. |
1086 ]. |
1086 ]. |
1087 ^ m |
1087 ^ m |