--- 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!