--- a/FramedBox.st	Sun Apr 13 02:40:52 2014 +0200
+++ b/FramedBox.st	Sun Apr 13 03:36:31 2014 +0200
@@ -710,7 +710,7 @@
     ].
 
     sep := gc font heightOn:self graphicsDevice.
-    sep2 := sep + sep.
+    sep2 := sep "+ sep".
 
     true "showFrame" ifFalse:[
         ^ super preferredExtent + (0 @ sep2)
@@ -764,10 +764,10 @@
 !FramedBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.57 2014-02-18 16:45:48 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.58 2014-04-13 01:36:31 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.57 2014-02-18 16:45:48 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.58 2014-04-13 01:36:31 cg Exp $'
 ! !