--- a/Label.st	Wed Nov 15 17:20:37 1995 +0100
+++ b/Label.st	Thu Nov 16 16:21:04 1995 +0100
@@ -38,7 +38,7 @@
 !
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.33 1995-11-11 16:20:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.34 1995-11-16 15:21:04 cg Exp $'
 !
 
 documentation
@@ -1272,7 +1272,8 @@
 	]
     ].
 
-    textHeight := font height * numberOfLines + font descent.
+"/    textHeight := font height * numberOfLines + font descent.
+    textHeight := font height * numberOfLines.
     textWidth := font widthOf:logo.
     labelWidth := textWidth + (hSpace * 2) .
     labelHeight := textHeight + (vSpace * 2)