--- a/XWorkstation.st	Tue Mar 06 18:26:39 2012 +0100
+++ b/XWorkstation.st	Tue Mar 06 18:33:27 2012 +0100
@@ -4748,6 +4748,15 @@
 
 !XWorkstation methodsFor:'event forwarding-ignored events'!
 
+reparentedView:aView parentId:parentId x:x y:y
+    "ignored for now"
+
+"/    parentView := self viewFromId:parentId.
+"/    parentView infoPrintCR.
+
+    "/ aView reparented
+!
+
 circulateNotify:aView place:aSymbol
     "sent, when the stacking order changes.
      ignored for now."
@@ -12068,7 +12077,7 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.522 2012-03-06 17:26:39 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.523 2012-03-06 17:33:27 stefan Exp $'
 !
 
 version_SVN