--- a/WSensor.st	Thu Feb 26 15:00:24 1998 +0100
+++ b/WSensor.st	Fri Feb 27 15:22:26 1998 +0100
@@ -1451,18 +1451,18 @@
                             "/ if its a map/unmap, we can forget 
                             "/ any older damage event for this view ...
                             (aDamage isUnmapEvent or:[aDamage isMapEvent]) ifTrue:[
-"/                                idx := idx - 1.
-"/                                [idx > 0] whileTrue:[
-"/                                    ev2 := damage at:idx.
-"/                                    ev2 notNil ifTrue:[
-"/                                        ev2 isDamage ifTrue:[
-"/                                            ev2 view == aView ifTrue:[
-"/                                                damage at:idx put:nil
-"/                                            ]
-"/                                        ]
-"/                                    ].
-"/                                    idx := idx - 1.
-"/                                ].
+                                idx := idx - 1.
+                                [idx > 0] whileTrue:[
+                                    ev2 := damage at:idx.
+                                    ev2 notNil ifTrue:[
+                                        ev2 isDamage ifTrue:[
+                                            ev2 view == aView ifTrue:[
+                                                damage at:idx put:nil
+                                            ]
+                                        ]
+                                    ].
+                                    idx := idx - 1.
+                                ].
                                 stopSearch := true
                             ].
                         ]
@@ -1593,7 +1593,7 @@
     ^ true
 
     "Created: / 8.2.1997 / 12:07:06 / cg"
-    "Modified: / 16.2.1998 / 13:34:20 / cg"
+    "Modified: / 27.2.1998 / 01:49:06 / cg"
 !
 
 damage
@@ -2429,6 +2429,6 @@
 !WindowSensor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Attic/WSensor.st,v 1.117 1998-02-16 14:09:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Attic/WSensor.st,v 1.118 1998-02-27 14:22:26 cg Exp $'
 ! !
 WindowSensor initialize!

--- a/WindowSensor.st	Thu Feb 26 15:00:24 1998 +0100
+++ b/WindowSensor.st	Fri Feb 27 15:22:26 1998 +0100
@@ -1451,18 +1451,18 @@
                             "/ if its a map/unmap, we can forget 
                             "/ any older damage event for this view ...
                             (aDamage isUnmapEvent or:[aDamage isMapEvent]) ifTrue:[
-"/                                idx := idx - 1.
-"/                                [idx > 0] whileTrue:[
-"/                                    ev2 := damage at:idx.
-"/                                    ev2 notNil ifTrue:[
-"/                                        ev2 isDamage ifTrue:[
-"/                                            ev2 view == aView ifTrue:[
-"/                                                damage at:idx put:nil
-"/                                            ]
-"/                                        ]
-"/                                    ].
-"/                                    idx := idx - 1.
-"/                                ].
+                                idx := idx - 1.
+                                [idx > 0] whileTrue:[
+                                    ev2 := damage at:idx.
+                                    ev2 notNil ifTrue:[
+                                        ev2 isDamage ifTrue:[
+                                            ev2 view == aView ifTrue:[
+                                                damage at:idx put:nil
+                                            ]
+                                        ]
+                                    ].
+                                    idx := idx - 1.
+                                ].
                                 stopSearch := true
                             ].
                         ]
@@ -1593,7 +1593,7 @@
     ^ true
 
     "Created: / 8.2.1997 / 12:07:06 / cg"
-    "Modified: / 16.2.1998 / 13:34:20 / cg"
+    "Modified: / 27.2.1998 / 01:49:06 / cg"
 !
 
 damage
@@ -2429,6 +2429,6 @@
 !WindowSensor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WindowSensor.st,v 1.117 1998-02-16 14:09:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WindowSensor.st,v 1.118 1998-02-27 14:22:26 cg Exp $'
 ! !
 WindowSensor initialize!