equal
deleted
inserted
replaced
3645 ^ fullSpec literalArrayEncoding. |
3645 ^ fullSpec literalArrayEncoding. |
3646 |
3646 |
3647 ! |
3647 ! |
3648 |
3648 |
3649 setAttributesFromWindowSpec:aWindowSpec |
3649 setAttributesFromWindowSpec:aWindowSpec |
3650 "sets a window spec from aWindowSpec" |
3650 "sets a window spec from aWindowSpec and applies some attributes |
|
3651 to the canvas." |
|
3652 |
|
3653 |nm canvasView builder| |
3651 |
3654 |
3652 windowSpec := WindowSpec new copyValuesFromSpec:aWindowSpec. |
3655 windowSpec := WindowSpec new copyValuesFromSpec:aWindowSpec. |
3653 self canvas topView name: aWindowSpec name. |
3656 canvasView := self canvas. |
3654 self canvasNameChanged: aWindowSpec name. |
3657 |
|
3658 builder := UIBuilder new isEditing:true. |
|
3659 aWindowSpec setAttributesIn:canvasView with:builder. |
|
3660 |
|
3661 nm := aWindowSpec name. |
|
3662 canvasView topView name:nm. |
|
3663 self canvasNameChanged:nm. |
3655 self application treeSelection. |
3664 self application treeSelection. |
3656 ! ! |
3665 ! ! |
3657 |
3666 |
3658 !UIPainter::TreeView methodsFor:'canvas selection'! |
3667 !UIPainter::TreeView methodsFor:'canvas selection'! |
3659 |
3668 |