--- a/AbstractFileBrowser.st	Wed Nov 03 14:12:14 2004 +0100
+++ b/AbstractFileBrowser.st	Thu Nov 04 14:08:19 2004 +0100
@@ -2905,7 +2905,11 @@
     "aspect for show more file properties in DirectoryContentsBrowser 
     "
 
-    ^ self directoryContentsBrowser viewDetails
+    |directoryContentsBrowser|
+
+    directoryContentsBrowser := self directoryContentsBrowser.
+    directoryContentsBrowser isNil ifTrue:[^ nil].    
+    ^ directoryContentsBrowser viewDetails
 !
 
 viewDirectoryDescription
@@ -6571,5 +6575,5 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.272 2004-10-25 16:14:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.273 2004-11-04 13:08:19 cg Exp $'
 ! !