AbstractFileBrowser.st
changeset 17582 e12643cd5864
parent 17485 03eb18e3a5f6
child 17686 c6fc2da19287
--- a/AbstractFileBrowser.st	Sun Jul 16 14:40:04 2017 +0200
+++ b/AbstractFileBrowser.st	Mon Jul 17 12:20:59 2017 +0200
@@ -1599,16 +1599,20 @@
           )
          (MenuItem
             label: '-'
+            isVisible: false
           )
          (MenuItem
             enabled: enableMakeCurrentDirectory
             label: 'Make this the Default (Current) Directory'
             itemValue: doMakeCurrentDirectory
+            isVisible: false
           )
          )
         nil
         nil
       )
+
+    "Modified: / 17-07-2017 / 10:08:31 / cg"
 !
 
 editMenu
@@ -5587,10 +5591,15 @@
 !
 
 doMakeCurrentDirectory
-    OperatingSystem setCurrentDirectory:(self currentDirectory pathName).
-    self currentFileNameHolderChangedForCommon.
+    <resource: #obsolete>
+    
+    "/ no longer
+    ^ self
+"/    OperatingSystem setCurrentDirectory:(self currentDirectory pathName).
+"/    self currentFileNameHolderChangedForCommon.
 
     "Created: / 26-10-2010 / 17:21:19 / cg"
+    "Modified (format): / 17-07-2017 / 10:09:39 / cg"
 !
 
 fileGetInfo:longInfo