--- a/SimpleView.st	Tue May 28 22:06:03 1996 +0200
+++ b/SimpleView.st	Tue May 28 22:16:20 1996 +0200
@@ -5144,14 +5144,16 @@
 
     |sensor|
 
-    (sensor := self sensor) notNil ifTrue:[
-        sensor addDamage:(0@0 extent:width@height) view:self
-    ] ifFalse:[
-        self redrawX:0 y:0 width:width height:height
+    shown ifTrue:[
+        (sensor := self sensor) notNil ifTrue:[
+            sensor addDamage:(0@0 extent:width@height) view:self
+        ] ifFalse:[
+            self redrawX:0 y:0 width:width height:height
+        ]
     ]
 
     "Created: 26.5.1996 / 17:17:38 / cg"
-    "Modified: 28.5.1996 / 21:52:12 / cg"
+    "Modified: 28.5.1996 / 22:15:05 / cg"
 !
 
 invalidate:aRectangle
@@ -5163,17 +5165,19 @@
 
     |sensor|
 
-    (sensor := self sensor) notNil ifTrue:[
-        sensor addDamage:aRectangle view:self.
-    ] ifFalse:[
-        self redrawX:(aRectangle left)
-                   y:(aRectangle top)
-               width:(aRectangle width)
-              height:(aRectangle height)
+    shown ifTrue:[
+        (sensor := self sensor) notNil ifTrue:[
+            sensor addDamage:aRectangle view:self.
+        ] ifFalse:[
+            self redrawX:(aRectangle left)
+                       y:(aRectangle top)
+                   width:(aRectangle width)
+                  height:(aRectangle height)
+        ]
     ]
 
     "Created: 26.5.1996 / 17:18:25 / cg"
-    "Modified: 28.5.1996 / 21:52:01 / cg"
+    "Modified: 28.5.1996 / 22:15:21 / cg"
 !
 
 redraw
@@ -6126,6 +6130,6 @@
 !SimpleView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.108 1996-05-28 19:54:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.109 1996-05-28 20:16:20 cg Exp $'
 ! !
 SimpleView initialize!