--- a/TextView.st	Tue May 28 22:11:10 1996 +0200
+++ b/TextView.st	Tue May 28 22:20:48 1996 +0200
@@ -319,10 +319,12 @@
     selectionFgColor := color1 on:device.
     selectionBgColor := color2 on:device.
     shown ifTrue:[
-        self redraw
+        self hasSelection ifTrue:[
+            self redraw
+        ]
     ]
 
-    "Modified: 29.4.1996 / 12:14:56 / cg"
+    "Modified: 28.5.1996 / 22:20:19 / cg"
 ! !
 
 !TextView methodsFor:'accessing-mvc'!
@@ -2209,5 +2211,5 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.55 1996-05-28 19:15:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.56 1996-05-28 20:20:48 cg Exp $'
 ! !