Merge jv
authorMerge Script
Wed, 09 Mar 2016 06:56:52 +0100
branchjv
changeset 7204 bdf57a9327dc
parent 7202 fc488e2907c8 (current diff)
parent 7203 86050e7f2580 (diff)
child 7207 570a0d0344d7
Merge
WindowSensor.st
--- a/WindowSensor.st	Tue Mar 08 07:59:36 2016 +0000
+++ b/WindowSensor.st	Wed Mar 09 06:56:52 2016 +0100
@@ -1994,7 +1994,8 @@
     eventListeners notNil ifTrue:[
         "/ be prepared that a listener removes itself while we iterate...
         eventListeners copy do:[:aListener |
-            (aListener processEvent:anEvent) == true ifTrue:[
+            "SV 2016-03-08: I got a nil listener - work around"
+            (aListener notNil and:[(aListener processEvent:anEvent) == true]) ifTrue:[
                 anyListenerReturnedTrue := true
             ]
         ]