ColoredListEntry.st
changeset 93 f3158d8e67d0
parent 88 d591b16c8f46
child 97 306cb0aa67be
--- a/ColoredListEntry.st	Mon Nov 20 14:21:37 1995 +0100
+++ b/ColoredListEntry.st	Tue Nov 21 14:34:54 1995 +0100
@@ -36,7 +36,7 @@
 !
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ColoredListEntry.st,v 1.5 1995-11-16 16:26:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ColoredListEntry.st,v 1.6 1995-11-21 13:34:54 cg Exp $'
 !
 
 documentation
@@ -112,15 +112,15 @@
     bgColor notNil ifTrue:[
 	savedBgPaint := aGC backgroundPaint.
 	aGC paint:color on:bgColor.
-	aGC displayOpaqueString:string x:x y:y.
+	aGC displayOpaqueString:(string withTabsExpanded) x:x y:y.
 	aGC paint:savedPaint on:savedBgPaint
     ] ifFalse:[
 	aGC paint:color.
-	aGC displayString:string x:x y:y.
+	aGC displayString:(string withTabsExpanded) x:x y:y.
 	aGC paint:savedPaint
     ]
 
-    "Created: 16.11.1995 / 16:54:40 / cg"
+    "Modified: 16.11.1995 / 16:54:40 / cg"
 ! !
 
 !ColoredListEntry methodsFor:'accessing'!
@@ -153,5 +153,5 @@
 widthIn:aGC
     "return the width of the receiver when displayed in aGC"
 
-    ^ aGC font widthOf:string
+    ^ aGC font widthOf:(string withTabsExpanded)
 ! !