--- a/DropContext.st	Thu Jun 14 11:38:14 2018 +0200
+++ b/DropContext.st	Thu Jun 14 14:39:38 2018 +0200
@@ -204,10 +204,10 @@
         "/     ^ pnt + org.
         "/ ].
     ].
-    Transcript show:'targetPnt: '; showCR:pnt.
+    "/ Transcript show:'targetPnt: '; showCR:pnt.
     ^ pnt
 
-    "Modified: / 14-06-2018 / 11:07:37 / Claus Gittinger"
+    "Modified: / 14-06-2018 / 14:39:27 / Claus Gittinger"
 !
 
 targetWidget
@@ -404,5 +404,9 @@
 
 version
     ^ '$Header$'
+!
+
+version_CVS
+    ^ '$Header$'
 ! !