checkin from browser
authorClaus Gittinger <cg@exept.de>
Mon, 24 Feb 2003 12:17:15 +0100
changeset 2690 0989e3efe55b
parent 2689 ddaa98a64bd5
child 2691 2c4350e0bcf8
checkin from browser
Label.st
--- 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 $'
 ! !