equal
deleted
inserted
replaced
2925 "/ the canvas ... |
2925 "/ the canvas ... |
2926 |
2926 |
2927 treeView := TreeView new. |
2927 treeView := TreeView new. |
2928 painterView := StandardSystemView new. |
2928 painterView := StandardSystemView new. |
2929 |
2929 |
|
2930 name := name ? UIPainter defaultNameOfCanvas. |
|
2931 |
2930 painterView name: name. |
2932 painterView name: name. |
2931 painterView label: name. |
2933 painterView label: name. |
2932 painterView extent:300@300. |
2934 painterView extent:300@300. |
2933 |
2935 |
2934 painter := UIPainterView in:painterView. |
2936 painter := UIPainterView in:painterView. |