--- a/OptionBox.st	Wed Jul 09 17:04:42 2014 +0200
+++ b/OptionBox.st	Wed Jul 09 17:05:03 2014 +0200
@@ -447,8 +447,8 @@
 numberOfOptions:nOptions
     "set the number of options - this is a private interface"
 
-    buttons := OrderedCollection withSize:nOptions.
-    actions := OrderedCollection withSize:nOptions
+    buttons := OrderedCollection newWithSize:nOptions.
+    actions := OrderedCollection newWithSize:nOptions
 
     "Modified: 18.10.1996 / 14:54:30 / cg"
 ! !
@@ -679,10 +679,10 @@
 !OptionBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.78 2014-05-16 16:00:58 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.79 2014-07-09 15:05:03 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.78 2014-05-16 16:00:58 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.79 2014-07-09 15:05:03 cg Exp $'
 ! !