--- a/FileBrowser.st	Wed Sep 16 18:33:24 2009 +0200
+++ b/FileBrowser.st	Wed Sep 16 18:41:23 2009 +0200
@@ -799,7 +799,7 @@
             label: 'Rename...'
             itemValue: fileRename
             translateLabel: true
-            shortcutKey: Replace
+            shortcutKey: Rename
           )
          (MenuItem
             label: '-'
@@ -1956,13 +1956,12 @@
         or:[key == #CmdD
         or:[key == #Cmdu
         or:[key == #Cut
-        or:[key == #Cmdr
-        or:[key == #Replace
+        or:[key == #Rename
         or:[key == #InspectIt
         or:[key == #GotoLine
         or:[key == #CursorLeft
         or:[key == #CursorRight
-        or:[key == #DoIt]]]]]]]]]]]]]]) ifTrue:[^ true].
+        or:[key == #DoIt]]]]]]]]]]]]]) ifTrue:[^ true].
     ].
     ^ false
 
@@ -2016,7 +2015,7 @@
         self newDirectory.
         ^ self
     ].
-    ((key == #Cmdr) or:[key == #Replace]) ifTrue:[
+    (key == #Rename) ifTrue:[
         self fileRename.
         ^ self
     ].
@@ -7504,5 +7503,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.631 2009-03-02 17:10:31 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.632 2009-09-16 16:41:23 cg Exp $'
 ! !