AbstractDirectoryBrowser.st
changeset 7586 fdeb89d217b2
parent 7420 21a3b309b43e
child 9328 1adad8b2c2b7
--- a/AbstractDirectoryBrowser.st	Fri Jan 12 18:42:17 2007 +0100
+++ b/AbstractDirectoryBrowser.st	Fri Jan 12 18:42:24 2007 +0100
@@ -68,7 +68,7 @@
 
     self dropLeave:aContext.
 
-    destinationPath ifNil:[^ self].
+    destinationPath isNil ifTrue:[^ self].
 
     aContext dropSource argument == #archivApplication ifTrue:[
         receiver := aContext dropSource receiver.
@@ -209,5 +209,5 @@
 !AbstractDirectoryBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.22 2006-10-16 16:59:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.23 2007-01-12 17:42:24 cg Exp $'
 ! !