--- a/EditField.st	Thu Feb 20 14:52:09 2003 +0100
+++ b/EditField.st	Fri Feb 21 11:24:27 2003 +0100
@@ -1748,8 +1748,8 @@
                 )
     ] ifFalse:[
         items := #(
+                    ('Cut'    cut            Cut   )
                     ('Copy'   copySelection  Copy  )
-                    ('Cut'    cut            Cut   )
                     ('Paste'  pasteOrReplace Paste )
                    ).
         (acceptAction notNil 
@@ -2115,5 +2115,5 @@
 !EditField class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.160 2002-12-10 15:45:03 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.161 2003-02-21 10:23:58 cg Exp $'
 ! !

--- a/EditTextView.st	Thu Feb 20 14:52:09 2003 +0100
+++ b/EditTextView.st	Fri Feb 21 11:24:27 2003 +0100
@@ -4354,8 +4354,8 @@
                         ('Undo'    undo                    )
                         ('Again'   again            Again  )
                         ('-'                               )
+                        ('Cut'     cut              Cut    )
                         ('Copy'    copySelection    Copy   )
-                        ('Cut'     cut              Cut    )
                         ('Paste'   pasteOrReplace   Paste  )
                         ('-'                               )
                         ('Accept'  accept           Accept )
@@ -5448,5 +5448,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.292 2003-01-30 15:38:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.293 2003-02-21 10:24:27 cg Exp $'
 ! !