equal
deleted
inserted
replaced
98 |
98 |
99 "Created: 28.2.1996 / 15:03:14 / cg" |
99 "Created: 28.2.1996 / 15:03:14 / cg" |
100 ! ! |
100 ! ! |
101 |
101 |
102 !ComboView methodsFor:'accessing-contents'! |
102 !ComboView methodsFor:'accessing-contents'! |
|
103 |
|
104 contents |
|
105 ^ field model value |
|
106 |
|
107 "Created: 14.5.1996 / 13:05:16 / cg" |
|
108 "Modified: 14.5.1996 / 13:07:02 / cg" |
|
109 ! |
|
110 |
|
111 contents:something |
|
112 field model value:something |
|
113 |
|
114 "Created: 14.5.1996 / 13:05:33 / cg" |
|
115 "Modified: 14.5.1996 / 13:07:11 / cg" |
|
116 ! |
103 |
117 |
104 list:aList |
118 list:aList |
105 list := aList. |
119 list := aList. |
106 (list notNil and:[list notEmpty]) ifTrue:[ |
120 (list notNil and:[list notEmpty]) ifTrue:[ |
107 pullDownButton controller enable |
121 pullDownButton controller enable |
231 ! ! |
245 ! ! |
232 |
246 |
233 !ComboView class methodsFor:'documentation'! |
247 !ComboView class methodsFor:'documentation'! |
234 |
248 |
235 version |
249 version |
236 ^ '$Header: /cvs/stx/stx/libwidg2/ComboView.st,v 1.2 1996-05-02 16:30:11 stefan Exp $' |
250 ^ '$Header: /cvs/stx/stx/libwidg2/ComboView.st,v 1.3 1996-05-14 11:09:44 cg Exp $' |
237 ! ! |
251 ! ! |