fix: care for non.existing targetpoint
authorClaus Gittinger <cg@exept.de>
Thu, 05 Jun 2008 12:38:28 +0200
changeset 2492 5462e31d8af3
parent 2491 831417cc1e5b
child 2493 6aa0d6539c5d
fix: care for non.existing targetpoint
DropContext.st
--- a/DropContext.st	Thu Jun 05 11:35:57 2008 +0200
+++ b/DropContext.st	Thu Jun 05 12:38:28 2008 +0200
@@ -126,7 +126,7 @@
     dev := sourceWidget device.
     pnt := dev translatePoint:rootPoint from:(dev rootWindowId) to:targetId.
 
-    targetWidget notNil ifTrue:[
+    (pnt notNil and:[targetWidget notNil]) ifTrue:[
         (trn := targetWidget transformation) notNil ifTrue:[
             ^ trn applyInverseTo:pnt.
         ].
@@ -299,5 +299,5 @@
 !DropContext class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/DropContext.st,v 1.13 2008-05-05 14:04:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/DropContext.st,v 1.14 2008-06-05 10:38:28 cg Exp $'
 ! !