--- a/AbstractDirectoryBrowser.st	Fri Oct 13 18:24:28 2006 +0200
+++ b/AbstractDirectoryBrowser.st	Fri Oct 13 18:24:30 2006 +0200
@@ -61,6 +61,12 @@
     "Modified: / 13-10-2006 / 11:35:09 / cg"
 !
 
+canDropObjects:dropObjects
+    ^ inDropMode and:[canDropItem]
+
+    "Created: / 13-10-2006 / 15:54:04 / cg"
+!
+
 doDrop:aContext 
     |col destinationPath receiver didDrop|
 
@@ -121,6 +127,12 @@
     inDropMode := false.
 !
 
+dropObjects:dropObjects
+    self halt.
+
+    "Created: / 13-10-2006 / 15:55:35 / cg"
+!
+
 dropTargetItemChangedTo:anItem in:aContext
 
     self subclassResponsibility
@@ -209,5 +221,5 @@
 !AbstractDirectoryBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.20 2006-10-13 09:57:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.21 2006-10-13 16:24:30 cg Exp $'
 ! !