checkin from browser
authorClaus Gittinger <cg@exept.de>
Mon, 12 May 1997 19:02:02 +0200
changeset 1222 0770bb87d44e
parent 1221 0c2a4231fc9e
child 1223 840e31e3f140
checkin from browser
ListView.st
--- a/ListView.st	Fri May 09 12:20:01 1997 +0200
+++ b/ListView.st	Mon May 12 19:02:02 1997 +0200
@@ -349,17 +349,17 @@
 !
 
 backgroundColor:aColor
-    "set the background color"
+    "set the background color of the contents"
 
     bgColor ~~ aColor ifTrue:[
-	bgColor := aColor.
-	self viewBackground:bgColor.
-	shown ifTrue:[
-	    self invalidate "/ clear; redraw
-	]
+        bgColor := aColor.
+        self viewBackground:bgColor.
+        shown ifTrue:[
+            self invalidate "/ clear; redraw
+        ]
     ]
 
-    "Modified: 29.5.1996 / 16:18:48 / cg"
+    "Modified: 3.5.1997 / 10:27:40 / cg"
 !
 
 font:aFont
@@ -3621,5 +3621,5 @@
 !ListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.130 1997-04-18 12:52:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.131 1997-05-12 17:02:02 cg Exp $'
 ! !