--- a/SimpleView.st	Tue Nov 22 03:35:29 2016 +0100
+++ b/SimpleView.st	Tue Nov 22 23:11:27 2016 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -6516,20 +6518,20 @@
 
     "/ first ask my flags if its enforced or forbidden
     self requestFocusOnPointerEnter ifTrue:[
-	doRequestFocus := true
+        doRequestFocus := true
     ] ifFalse:[
-	self doNotRequestFocusOnPointerEnter ifTrue:[
-	    doRequestFocus := false
-	] ifFalse:[
-	    "/ then look for the settings.
-	    doRequestFocus := self wantsFocusWithPointerEnter
-	]
+        self doNotRequestFocusOnPointerEnter ifTrue:[
+            doRequestFocus := false
+        ] ifFalse:[
+            "/ then look for the settings.
+            doRequestFocus := self wantsFocusWithPointerEnter
+        ]
     ].
 
     doRequestFocus ifTrue:[
-	self requestFocus.
-    ].
-    dependents notNil ifTrue:[ self changed:#pointerInView ]
+        self requestFocus.
+    ].
+    dependents notNil ifTrue:[ self changed:#pointerInView with:true ]
 
     "Modified: / 01-08-2012 / 17:06:41 / cg"
 !
@@ -6538,7 +6540,7 @@
     "mouse pointer left"
 
     super pointerLeave:buttonState.
-    dependents notNil ifTrue:[ self changed:#pointerInView ]
+    dependents notNil ifTrue:[ self changed:#pointerInView with:false]
 !
 
 propertyChange:propertyId state: state