# HG changeset patch
# User Stefan Vogel <sv@exept.de>
# Date 1400224353 -7200
# Node ID 271f1187ee56fb24f446b28adf73c2a51042e659
# Parent  8db08f1414fb8be151d5c53e69010237ece62ac8
class: OptionBox
changed: #title:numberOfOptions: (send #new instead of #basicNew)

diff -r 8db08f1414fb -r 271f1187ee56 OptionBox.st
--- a/OptionBox.st	Thu May 15 19:24:40 2014 +0200
+++ b/OptionBox.st	Fri May 16 09:12:33 2014 +0200
@@ -142,7 +142,7 @@
 
     |box|
 
-    box := (self basicNew) numberOfOptions:nOptions.
+    box := self new numberOfOptions:nOptions.
     box device:Screen current.
     box initialize.
     box title:titleString.
@@ -677,10 +677,10 @@
 !OptionBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.76 2014-02-18 15:02:08 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.77 2014-05-16 07:12:33 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.76 2014-02-18 15:02:08 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.77 2014-05-16 07:12:33 stefan Exp $'
 ! !