--- a/DirectoryContentsBrowser.st	Fri May 16 10:39:41 2003 +0200
+++ b/DirectoryContentsBrowser.st	Fri May 16 14:38:34 2003 +0200
@@ -1107,8 +1107,8 @@
         self startDiskUsageInfoProcess.
     ].
     newDir := (self directoriesForFiles:aColOfFiles) first asCanonicalizedFilename. 
-    currentDir := self directory asCanonicalizedFilename.
-    newDir = currentDir ifTrue:[
+    currentDir := self directory.
+    (currentDir notNil and:[newDir = currentDir asCanonicalizedFilename]) ifTrue:[
         self selectFiles:aColOfFiles.
         ^ self.
     ].
@@ -2822,5 +2822,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.109 2003-05-16 08:39:41 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.110 2003-05-16 12:38:34 stefan Exp $'
 ! !