# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1534935491 -7200
# Node ID 6eafe043376317ed28c6edc6b650a218229f7c9a
# Parent  6a603b57665dd0a5c2a01dc8e54f69e2d5bce2bc
#QUALITY by cg
class: WindowSensor
comment/format in: #basicAddDamage:view:

diff -r 6a603b57665d -r 6eafe0433763 WindowSensor.st
--- a/WindowSensor.st	Wed Aug 22 12:29:25 2018 +0200
+++ b/WindowSensor.st	Wed Aug 22 12:58:11 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1993 by Claus Gittinger
               All Rights Reserved
@@ -2121,6 +2119,11 @@
     |sz  "{ Class: SmallInteger }" 
      aDamageEvent oldDamageEvent oldDamageEventIndex anyOtherEventPending lastNilIndex|
 
+    "/ TraceDamage == aView ifTrue:[
+    "/     Transcript showCR:'-----------'.
+    "/     thisContext fullPrintAllOn:Transcript.
+    "/ ].    
+
     "/ NEWDAMAGE handling - experimental;
     "/ comment these lines if you encounter trouble.
     sz := damage size.
@@ -2301,6 +2304,7 @@
     "Modified: / 20-01-2011 / 22:41:50 / cg"
     "Modified (comment): / 29-01-2018 / 14:53:16 / mawalch"
     "Modified: / 13-04-2018 / 14:30:13 / stefan"
+    "Modified: / 22-08-2018 / 12:42:34 / Claus Gittinger"
 !
 
 basicPushEvent:anEvent