OptBox.st
changeset 132 596439fe4efd
parent 131 208fa92f434d
child 133 e58c7c979f33
--- a/OptBox.st	Tue Jun 27 04:24:41 1995 +0200
+++ b/OptBox.st	Mon Jul 03 04:34:22 1995 +0200
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1991 by Claus Gittinger
 	     All Rights Reserved
 
-$Header: /cvs/stx/stx/libwidg/Attic/OptBox.st,v 1.18 1995-06-27 02:23:37 claus Exp $
+$Header: /cvs/stx/stx/libwidg/Attic/OptBox.st,v 1.19 1995-07-03 02:33:29 claus Exp $
 '!
 
 !OptionBox class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libwidg/Attic/OptBox.st,v 1.18 1995-06-27 02:23:37 claus Exp $
+$Header: /cvs/stx/stx/libwidg/Attic/OptBox.st,v 1.19 1995-07-03 02:33:29 claus Exp $
 "
 !
 
@@ -311,7 +311,7 @@
 preferredExtent 
     "return a size to make everything fit into myself"
 
-    |w w1 w2 h maxH prefPanel|
+    |w w1 h maxH prefPanel|
 
     w1 := ViewSpacing + formLabel width + ViewSpacing + textLabel width + ViewSpacing.
     prefPanel := buttonPanel preferredExtent.