--- a/AbstractDirectoryBrowser.st	Tue Apr 12 19:20:26 2005 +0200
+++ b/AbstractDirectoryBrowser.st	Thu Apr 14 11:13:31 2005 +0200
@@ -105,8 +105,8 @@
         aObject isFileObject ifFalse:[^ self].
 
         checkObject := aObject theObject.
-        checkObject isFilename not ifTrue:[^ self].
-        ((aContext dropSource argument == #archivApplication) not) ifTrue:[
+        checkObject isFilename ifFalse:[^ self].
+        (aContext dropSource argument == #archivApplication) ifFalse:[
             checkObject isSpecialFile ifTrue:[^ self].
             checkObject isReadable ifFalse:[^ self].
         ].
@@ -208,5 +208,5 @@
 !AbstractDirectoryBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.14 2004-08-04 18:00:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.15 2005-04-14 09:13:31 cg Exp $'
 ! !