--- a/ExtendedComboBox.st Wed Nov 28 13:13:34 2007 +0100
+++ b/ExtendedComboBox.st Wed Nov 28 13:17:05 2007 +0100
@@ -914,8 +914,9 @@
createEditField
|nm|
- menuField := EditField in:self.
-
+ menuField isNil ifTrue:[
+ menuField := EditField in:self.
+ ].
menuField origin:0.0 @ 0.0 corner:1.0 @ 1.0.
styleSheet is3D ifTrue:[
@@ -1498,5 +1499,5 @@
!ExtendedComboBox class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/ExtendedComboBox.st,v 1.51 2007-07-18 13:48:10 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/ExtendedComboBox.st,v 1.52 2007-11-28 12:17:05 ca Exp $'
! !