--- a/Label.st Fri Feb 21 15:19:38 2003 +0100
+++ b/Label.st Mon Feb 24 12:17:15 2003 +0100
@@ -1046,9 +1046,9 @@
]
]
] ifFalse:[
- aStringOrFormOrImage notNil ifTrue:[
- newLogo := aStringOrFormOrImage asString.
- ].
+"/ aStringOrFormOrImage notNil ifTrue:[
+"/ newLogo := aStringOrFormOrImage asString.
+"/ ].
"/ any change ?
(logo = newLogo) ifTrue:[
(logo emphasis = newLogo emphasis) ifTrue:[
@@ -1768,7 +1768,6 @@
logo displayOn:self x:x y:y opaque:doClear
]
].
-
].
adjust == #fit ifTrue:[
@@ -1839,5 +1838,5 @@
!Label class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.117 2002-11-15 13:44:31 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.118 2003-02-24 11:17:15 cg Exp $'
! !