--- a/XWorkstation.st	Mon Mar 13 17:42:36 2017 +0100
+++ b/XWorkstation.st	Tue Mar 14 16:31:34 2017 +0100
@@ -5547,7 +5547,7 @@
 
     |selectionFetcher|
 
-"/    Transcript show:'seletionNotify selID:'.
+"/    Transcript show:'selectionNotify selID:'.
 "/    Transcript show:selectionID; show:' ('; show:(self atomName:selectionID); show:') '.
 "/    Transcript show:' targetID:'.
 "/    Transcript show:targetID; show:' ('; show:(self atomName:targetID); show:') '.
@@ -5559,13 +5559,15 @@
     lastEventTime := time.
 
     aView isNil ifTrue:[
-	"event arrived, after aView has been destroyed"
-	^ self
+        "event arrived, after aView has been destroyed"
+        ^ self
     ].
     selectionFetcher := self findSelectionFetcher:aView id.
     selectionFetcher notNil ifTrue:[
-	selectionFetcher message:thisContext message.
-    ].
+        selectionFetcher message:thisContext message.
+    ].
+
+    "Modified (format): / 14-03-2017 / 16:31:20 / cg"
 !
 
 selectionRequest:aView requestor:requestorID selection:selectionID target:targetID property:propertyID time:time