diff -r 9a0756baf461 -r e87c85566e08 DragAndDropManager.st --- a/DragAndDropManager.st Mon Feb 22 09:32:15 2010 +0100 +++ b/DragAndDropManager.st Tue Mar 02 11:26:40 2010 +0100 @@ -1585,8 +1585,11 @@ ]. view application ~~ app ifTrue:[ app := view application. - (app canDropObjects:dobj) ifTrue:[ - ^ (DropTarget receiver:app argument:nil dropSelector:#dropObjects:at:) oldDropAPI:true. + + app notNil ifTrue:[ + (app canDropObjects:dobj) ifTrue:[ + ^ (DropTarget receiver:app argument:nil dropSelector:#dropObjects:at:) oldDropAPI:true. + ]. ]. ]. (view := view superView) notNil @@ -1711,11 +1714,11 @@ !DragAndDropManager class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.88 2010-02-08 12:03:53 cg Exp $' + ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.89 2010-03-02 10:26:40 ca Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.88 2010-02-08 12:03:53 cg Exp $' + ^ '$Header: /cvs/stx/stx/libview2/DragAndDropManager.st,v 1.89 2010-03-02 10:26:40 ca Exp $' ! ! DragAndDropManager initialize!