*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Mon, 04 Feb 2008 10:28:33 +0100
changeset 2263 e3784764ba54
parent 2262 d40eebea4d20
child 2264 26ee5a23ae95
*** empty log message ***
MenuEditor.st
--- a/MenuEditor.st	Mon Feb 04 10:28:24 2008 +0100
+++ b/MenuEditor.st	Mon Feb 04 10:28:33 2008 +0100
@@ -2248,6 +2248,8 @@
     evView := anEvent targetView.
     evView isNil ifTrue:[ ^ false ].
 
+    "/ only handle keyboard events for the left item list
+    "/ (otherwise, copy-paste would not work in the editFields on the right)
     inView := evView isSameOrComponentOf:listOfItemsView.
     inView ifFalse:[^ false].
 
@@ -2258,28 +2260,28 @@
      or:[key == #BackSpace
      or:[key == #Cut]]
     ) ifTrue:[
-	self doCut.
-	^ true.
+        self doCut.
+        ^ true.
     ].
 
     key == #Copy  ifTrue:[ self doCopy.  ^ true ].
     key == #Paste ifTrue:[ self doPaste. ^ true ].
 
     (rawKey == #CtrlCursorUp) ifTrue:[
-	self doMoveUp.
-	^ true.
+        self doMoveUp.
+        ^ true.
     ].
     (rawKey == #CtrlCursorDown) ifTrue:[
-	self doMoveDown.
-	^ true.
+        self doMoveDown.
+        ^ true.
     ].
     (rawKey == #CtrlCursorLeft) ifTrue:[
-	self doMoveOut.
-	^ true.
+        self doMoveOut.
+        ^ true.
     ].
     (rawKey == #CtrlCursorRight) ifTrue:[
-	self doMoveInNext.
-	^ true.
+        self doMoveInNext.
+        ^ true.
     ].
 
     ^ false.