# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1046270938 -3600
# Node ID cc32f33b6b6032da059c0ea49b7fe746f1e123c6
# Parent  260240b162824b09ffb7af1ed71db69067126b0a
cut-copy-paste is the correct order

diff -r 260240b16282 -r cc32f33b6b60 DirectoryContentsBrowser.st
--- a/DirectoryContentsBrowser.st	Wed Feb 26 15:42:08 2003 +0100
+++ b/DirectoryContentsBrowser.st	Wed Feb 26 15:48:58 2003 +0100
@@ -443,18 +443,18 @@
      #(#Menu
         #(
          #(#MenuItem
+            #label: 'Cut'
+            #itemValue: #doCut
+            #translateLabel: true
+            #shortcutKey: #Cut
+          )
+         #(#MenuItem
             #label: 'Copy'
             #itemValue: #doCopy
             #translateLabel: true
             #shortcutKey: #Copy
           )
          #(#MenuItem
-            #label: 'Cut'
-            #itemValue: #doCut
-            #translateLabel: true
-            #shortcutKey: #Cut
-          )
-         #(#MenuItem
             #enabled: #canPaste
             #label: 'Paste'
             #itemValue: #pasteFiles
@@ -2868,5 +2868,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.83 2003-02-26 14:39:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.84 2003-02-26 14:48:27 cg Exp $'
 ! !
diff -r 260240b16282 -r cc32f33b6b60 DirectoryTreeBrowser.st
--- a/DirectoryTreeBrowser.st	Wed Feb 26 15:42:08 2003 +0100
+++ b/DirectoryTreeBrowser.st	Wed Feb 26 15:48:58 2003 +0100
@@ -184,6 +184,13 @@
      #(#Menu
         #(
          #(#MenuItem
+            #label: 'Cut'
+            #itemValue: #doCut
+            #translateLabel: true
+            #isVisible: #allowFileOperations
+            #shortcutKey: #Cut
+          )
+         #(#MenuItem
             #label: 'Copy'
             #itemValue: #doCopy
             #translateLabel: true
@@ -191,13 +198,6 @@
             #shortcutKey: #Copy
           )
          #(#MenuItem
-            #label: 'Cut'
-            #itemValue: #doCut
-            #translateLabel: true
-            #isVisible: #allowFileOperations
-            #shortcutKey: #Cut
-          )
-         #(#MenuItem
             #enabled: #canPaste
             #label: 'Paste'
             #itemValue: #pasteFiles
@@ -1356,5 +1356,5 @@
 !DirectoryTreeBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.47 2003-02-26 14:39:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.48 2003-02-26 14:48:58 cg Exp $'
 ! !