DragHandler.st
changeset 2438 27171b77ab40
parent 2435 081b5c1b73c8
child 2626 762fe84ed4fa
--- a/DragHandler.st	Tue Apr 22 18:16:43 2008 +0200
+++ b/DragHandler.st	Tue Apr 22 18:16:52 2008 +0200
@@ -107,12 +107,17 @@
 
 !DragHandler methodsFor:'accessing'!
 
-targetView
-    ^ targetView
+dropContext
+    ^ dropContext
 !
 
-targetView:something
-    targetView := something.
+dropContext:something
+    dropContext := something.
+!
+
+targetView
+    dropContext isNil ifTrue:[^ nil].
+    ^ dropContext targetView
 ! !
 
 !DragHandler methodsFor:'event dropTarget'!
@@ -459,5 +464,5 @@
 !DragHandler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/DragHandler.st,v 1.11 2008-04-22 15:26:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/DragHandler.st,v 1.12 2008-04-22 16:16:52 cg Exp $'
 ! !