equal
deleted
inserted
replaced
2868 selectionPanel allButOpenInterface:#windowSpec. |
2868 selectionPanel allButOpenInterface:#windowSpec. |
2869 (galleryWindow := selectionPanel window) openInGroup:(topView windowGroup). |
2869 (galleryWindow := selectionPanel window) openInGroup:(topView windowGroup). |
2870 selectionPanel openWindow. |
2870 selectionPanel openWindow. |
2871 selectionPanel masterApplication:self. |
2871 selectionPanel masterApplication:self. |
2872 |
2872 |
2873 icon := Smalltalk bitmapFromFileNamed:'UIPainter.xbm' forClass:self class. |
2873 icon := Smalltalk imageFromFileNamed:'UIPainter.xbm' forClass:self class. |
2874 topView iconLabel:'GUI Painter'. |
2874 topView iconLabel:'GUI Painter'. |
2875 topView icon:icon. |
2875 topView icon:icon. |
2876 |
2876 |
2877 painterView iconLabel:'GUI Canvas'. |
2877 painterView iconLabel:'GUI Canvas'. |
2878 painterView icon:icon. |
2878 painterView icon:icon. |