equal
deleted
inserted
replaced
3438 self helpTool helpKey:(spec activeHelpKey). |
3438 self helpTool helpKey:(spec activeHelpKey). |
3439 slices := spec class slices. |
3439 slices := spec class slices. |
3440 |
3440 |
3441 list := slices collect:[:eachSlice | eachSlice first asString]. |
3441 list := slices collect:[:eachSlice | eachSlice first asString]. |
3442 self treeView isCanvasSelected ifFalse:[ |
3442 self treeView isCanvasSelected ifFalse:[ |
3443 list add:(UIHelpTool label) |
3443 list := list copyWith:(UIHelpTool label) |
3444 ]. |
3444 ]. |
3445 view notNil ifTrue:[ |
3445 view notNil ifTrue:[ |
3446 list add:UILayoutTool label. |
3446 list := list copyWith:UILayoutTool label. |
3447 ]. |
3447 ]. |
3448 |
3448 |
3449 "/ size := slices size. |
3449 "/ size := slices size. |
3450 "/ view notNil ifTrue:[ |
3450 "/ view notNil ifTrue:[ |
3451 "/ self treeView isCanvasSelected ifFalse:[ |
3451 "/ self treeView isCanvasSelected ifFalse:[ |