--- a/Label.st	Wed Feb 24 17:56:06 1999 +0100
+++ b/Label.st	Fri Feb 26 13:45:05 1999 +0100
@@ -1447,7 +1447,7 @@
             logo := logo asStringCollection
         ]
     ] ifFalse:[
-        (logo isKindOf:StringCollection) ifTrue:[
+        (logo isStringCollection) ifTrue:[
             numberOfLines := logo size.
             (numberOfLines <= 1) ifTrue:[
                 logo := logo asString
@@ -1662,7 +1662,7 @@
 
             (logo isString
             or:[logo species == String
-            or:[logo isKindOf:StringCollection]]) ifTrue:[
+            or:[logo isStringCollection]]) ifTrue:[
                 stringLogo := true.
                 y := y + (font ascent).
             ] ifFalse:[
@@ -1697,7 +1697,7 @@
             logo isString ifTrue:[
                 self displayOpaqueString:logo x:x y:y
             ] ifFalse:[
-                (logo isKindOf:StringCollection) ifTrue:[
+                (logo isStringCollection) ifTrue:[
                     logo do:[ :line |
                         self displayOpaqueString:(line printString) x:x y:y.
                         y := y + (font height)
@@ -1759,5 +1759,5 @@
 !Label class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.95 1998-09-18 15:40:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.96 1999-02-26 12:44:28 cg Exp $'
 ! !