--- a/ListView.st	Thu Jan 16 22:02:25 1997 +0100
+++ b/ListView.st	Thu Jan 16 23:47:49 1997 +0100
@@ -1881,13 +1881,15 @@
      if there is a pattern-background, we have to scroll everything
     "
     (viewBackground isColor not
-     or:[viewBackground colorId notNil]) ifTrue:[
-	^ width
+     or:[viewBackground isDithered]) ifTrue:[
+        ^ width
     ].
 
     w := self widthOfWidestLineBetween:firstLine and:lastLine.
     (w > innerWidth) ifTrue:[^ innerWidth].
     ^ w
+
+    "Modified: 16.1.1997 / 23:39:34 / cg"
 !
 
 widthOfLineString:entry
@@ -3487,5 +3489,5 @@
 !ListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.116 1997-01-13 23:12:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.117 1997-01-16 22:47:49 cg Exp $'
 ! !