--- a/Label.st Sat Mar 01 14:14:02 1997 +0100
+++ b/Label.st Sun Mar 02 00:17:38 1997 +0100
@@ -1537,7 +1537,11 @@
logo := logo on:device.
"/ self background:bg.
- self displayOpaqueForm:logo x:x y:y
+ logo mask notNil ifTrue:[
+ self displayForm:logo x:x y:y
+ ] ifFalse:[
+ self displayOpaqueForm:logo x:x y:y
+ ]
] ifFalse:[
x := x + hSpace.
y := y + vSpace.
@@ -1597,7 +1601,7 @@
]
- "Modified: 13.5.1996 / 11:16:37 / cg"
+ "Modified: 2.3.1997 / 00:16:49 / cg"
!
redraw
@@ -1640,5 +1644,5 @@
!Label class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.74 1997-02-24 20:10:55 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.75 1997-03-01 23:17:38 cg Exp $'
! !