--- a/WindowGroup.st	Wed Apr 11 14:23:04 2018 +0200
+++ b/WindowGroup.st	Wed Apr 11 14:30:34 2018 +0200
@@ -474,17 +474,19 @@
 !WindowGroup class methodsFor:'others'!
 
 sendKeyboardFocusEventTo:aView withArgument:arg
-    |sensor ev|
-
-    aView isNil ifTrue:[^ self].
+    |sensor|
+
+    aView isNil ifTrue:[
+        ^ self
+    ].
 
     (sensor := aView sensor) notNil ifTrue:[
-        ev := WindowEvent keyboardFocus:arg view:aView.   
-        sensor notifyEventListenersAbout:ev.
-        sensor pushEvent:ev.
+        sensor pushEvent:(WindowEvent keyboardFocus:arg view:aView).
     ] ifFalse:[
         aView hasKeyboardFocus:arg
     ].
+
+    "Modified (format): / 11-04-2018 / 14:27:50 / stefan"
 ! !
 
 !WindowGroup methodsFor:'accessing'!