DirectoryContentsBrowser.st
changeset 4410 b1972ecceb2a
parent 4404 1165b811a9a9
child 4415 311ffc07cab6
--- a/DirectoryContentsBrowser.st	Mon Dec 23 15:00:20 2002 +0100
+++ b/DirectoryContentsBrowser.st	Sat Dec 28 15:52:20 2002 +0100
@@ -562,6 +562,27 @@
                   #translateLabel: true
                   #submenuChannel: #sortMenu
                 )
+               #(#MenuItem
+                  #label: 'Show'
+                  #translateLabel: true
+                  #submenu: 
+                 #(#Menu
+                    #(
+         #(#MenuItem
+            #label: 'Hidden Files'
+            #translateLabel: true
+            #indication: #showHiddenFiles
+          )
+         #(#MenuItem
+            #label: 'Directories'
+            #translateLabel: true
+            #indication: #viewDirsInContentsBrowser
+          )
+                     )
+                    nil
+                    nil
+                  )
+                )
                )
               nil
               nil
@@ -940,7 +961,7 @@
 !
 
 doUpdate
-
+    DirectoryContents flushCache.
     self wakeUpForDirectoryContentsChanged.
 !
 
@@ -2733,5 +2754,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.68 2002-12-20 15:23:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.69 2002-12-28 14:52:20 cg Exp $'
 ! !