--- a/AbstractFileBrowser.st	Mon Dec 14 15:15:13 2009 +0100
+++ b/AbstractFileBrowser.st	Mon Dec 14 15:20:51 2009 +0100
@@ -3336,6 +3336,10 @@
 viewDirsInContentsBrowser
 
     ^ self aspectFor:#viewDirsInContentsBrowser ifAbsent:[ false asValue ].
+
+    "
+     UserPreferences current viewDirsInContentsBrowser
+    "
 !
 
 viewFilesInContentsBrowser
@@ -7931,9 +7935,9 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.430 2009-12-04 11:21:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.431 2009-12-14 14:20:51 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.430 2009-12-04 11:21:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.431 2009-12-14 14:20:51 cg Exp $'
 ! !