tab handling
authorClaus Gittinger <cg@exept.de>
Tue, 06 Mar 2007 21:43:23 +0100
changeset 3196 195bfa3ddf8e
parent 3195 39debbeac7d5
child 3197 080d2ef610a5
tab handling
ComboBoxView.st
--- a/ComboBoxView.st	Tue Mar 06 21:41:09 2007 +0100
+++ b/ComboBoxView.st	Tue Mar 06 21:43:23 2007 +0100
@@ -223,7 +223,11 @@
     m addDependent:self.
     field acceptOnLostFocus:true.
     field acceptOnLeave:true.
-    field leaveAction:[:key | self fieldLeft].
+    field 
+        leaveAction:[:key | 
+            self fieldLeft.
+            field handleFocusKey:key.
+        ].
 
     "
      all of my input goes to the enterfield
@@ -241,7 +245,7 @@
     "
 
     "Created: / 28-02-1996 / 15:07:51 / cg"
-    "Modified: / 15-10-2006 / 15:19:18 / cg"
+    "Modified: / 06-03-2007 / 20:19:32 / cg"
 ! !
 
 !ComboBoxView methodsFor:'private'!
@@ -302,5 +306,5 @@
 !ComboBoxView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ComboBoxView.st,v 1.28 2006-10-16 09:12:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ComboBoxView.st,v 1.29 2007-03-06 20:43:23 cg Exp $'
 ! !