--- a/FramedBox.st	Wed May 07 03:28:03 2014 +0000
+++ b/FramedBox.st	Wed May 07 17:44:16 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.58 2014-04-13 01:36:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.59 2014-05-07 15:44:16 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.58 2014-04-13 01:36:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FramedBox.st,v 1.59 2014-05-07 15:44:16 cg Exp $'
 ! !