equal
deleted
inserted
replaced
94 ^ 'NewApplication' |
94 ^ 'NewApplication' |
95 ! |
95 ! |
96 |
96 |
97 selectionPanelClass |
97 selectionPanelClass |
98 ^ SelectionPanelClass |
98 ^ SelectionPanelClass |
|
99 |
|
100 " |
|
101 UIPainter selectionPanelClass. |
|
102 UIPainter selectionPanelClass:UISelectionPanel |
|
103 " |
99 ! |
104 ! |
100 |
105 |
101 selectionPanelClass:something |
106 selectionPanelClass:something |
102 "set the class used as selection panel. |
107 "set the class used as selection panel. |
103 this is UISelectionPanel as default" |
108 this is UISelectionPanel as default" |
104 |
109 |
105 SelectionPanelClass := something. |
110 SelectionPanelClass := something. |
|
111 |
|
112 " |
|
113 UIPainter selectionPanelClass:UISelectionPanel |
|
114 " |
106 ! ! |
115 ! ! |
107 |
116 |
108 !UIPainter class methodsFor:'help specs'! |
117 !UIPainter class methodsFor:'help specs'! |
109 |
118 |
110 flyByHelpSpec |
119 flyByHelpSpec |