--- a/ExtendedComboBox.st	Tue Sep 19 13:48:48 2000 +0200
+++ b/ExtendedComboBox.st	Thu Sep 21 00:46:29 2000 +0200
@@ -728,6 +728,12 @@
     menuField notNil ifTrue:[ menuField model:model ].
 ! !
 
+!ExtendedComboBox methodsFor:'accessing-components'!
+
+menuField
+    ^ menuField
+! !
+
 !ExtendedComboBox methodsFor:'accessing-default menus'!
 
 directory:aDirectory
@@ -1504,5 +1510,5 @@
 !ExtendedComboBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ExtendedComboBox.st,v 1.21 2000-09-19 11:48:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ExtendedComboBox.st,v 1.22 2000-09-20 22:46:29 cg Exp $'
 ! !