*** empty log message *** expecco_2_11_0
authorsr
Mon, 03 Apr 2017 12:14:18 +0200
branchexpecco_2_11_0
changeset 7993 4cb858597bbf
parent 7975 8db05a559494
*** empty log message ***
WindowSensor.st
--- a/WindowSensor.st	Mon Mar 13 17:40:36 2017 +0100
+++ b/WindowSensor.st	Mon Apr 03 12:14:18 2017 +0200
@@ -1977,7 +1977,7 @@
                         (wgProcess := evView windowGroup process) notNil ifTrue:[
                             wgProcess isDebugged ifTrue:[
                                 "/ but not for debuggers inside debuggers
-                                (evView topView isDebugView) ifFalse:[
+                                (evView topView isKindOf:DebugView) ifFalse:[
                                     DebugView allInstances do:[:dbg |
                                         dbg inspectedProcess == wgProcess ifTrue:[
                                             dbg window topView raiseDeiconified
@@ -2695,6 +2695,8 @@
      Called privately when pointer enters a view."
 
     |state|
+	
+	aDevice isNil ifTrue:[^ self].
 
     "/ Prevents wrong behavior in the following scenario:
     "/    ctrl is pressed in a view