--- a/Label.st Mon Oct 08 17:23:45 2007 +0200
+++ b/Label.st Tue Oct 09 10:42:57 2007 +0200
@@ -1547,10 +1547,12 @@
- helper for form:/font: etc."
self computeLabelSize.
+
fixSize ifFalse:[
- self resize
+ self resize.
+ ] ifTrue:[
+ self computeLabelOrigin.
].
- self computeLabelOrigin.
self invalidate
"Modified: / 6.6.1998 / 19:23:45 / cg"
@@ -1796,6 +1798,12 @@
fixSize := false.
self extent:self preferredExtent.
self computeLabelOrigin.
+ "/ this seems the only one which might depend on my contents.
+ layout isLayout ifTrue:[
+ layout isAlignmentOrigin ifTrue:[
+ self containerChangedSize.
+ ]
+ ].
fixSize := prevFixSize.
]
!
@@ -1835,5 +1843,5 @@
!Label class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.128 2007-06-22 13:30:54 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.129 2007-10-09 08:42:57 ca Exp $'
! !