Label.st
changeset 832 4c4b0e34e964
parent 817 58c611fad735
child 935 2a105c61d86c
--- a/Label.st	Tue Sep 10 00:59:12 1996 +0200
+++ b/Label.st	Wed Sep 11 20:01:21 1996 +0200
@@ -1226,7 +1226,7 @@
     super initialize.
 
     font := font on:device.
-    self height:(font height + font descent).
+    self initialHeight:(font height + font descent).
     adjust := #center.
     labelOriginX := labelOriginY := 0.
     labelWidth := labelHeight := 0.
@@ -1615,5 +1615,5 @@
 !Label  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.69 1996-08-02 19:03:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.70 1996-09-11 18:01:21 dq Exp $'
 ! !