# HG changeset patch
# User Stefan Vogel <sv@exept.de>
# Date 1361969647 -3600
# Node ID 915f6fa47e091bcc68e943ff1dac7086aaa92cb9
# Parent  d169a9e82ddc1c068ec5c797fdb71b9a94a037af
class: DSVColumnView
comment/format in: #characterPress:x:y:
changed:
        #keyPress:x:y:
        #openEditorOnSelection

Handle #BackTab and Shift-#Tab correctly

diff -r d169a9e82ddc -r 915f6fa47e09 DSVColumnView.st
--- a/DSVColumnView.st	Fri Feb 22 13:31:10 2013 +0100
+++ b/DSVColumnView.st	Wed Feb 27 13:54:07 2013 +0100
@@ -2564,7 +2564,7 @@
 !
 
 characterPress:aChar x:x y:y
-    "search row in column at x/y starting its printable label with cahracter."
+    "search row in column at x/y starting its printable label with character."
 
     |colNr rowNr lsize found column|
 
@@ -2829,7 +2829,7 @@
         ].
 
         (aKey includesString:'Tab') ifTrue:[
-            key := (self sensor shiftDown or:[aKey includesString:'Left']) 
+            key := (aKey = #BackTab or:[self sensor shiftDown or:[aKey includesString:'Left']]) 
                         ifTrue:[#CursorLeft]
                         ifFalse:[#CursorRight]
         ] ifFalse:[
@@ -4248,18 +4248,18 @@
     editorAndModel editorNeedsCursorKeys ifTrue:[
         editorAndModel editorNeedsReturnKey ifTrue:[
             "/ only steal TAB from the editor
-            filter := [:aKey | aKey == #Tab ]
+            filter := [:aKey | #( #Tab #NonInsertingTab #BackTab ) includes:aKey ]
         ] ifFalse:[
             "/ steal TAB and RETURN from the editor
-            filter := [:aKey | #( #Tab #Return ) includes:aKey ]
+            filter := [:aKey | #( #Tab #NonInsertingTab #BackTab #Return ) includes:aKey ]
         ].
     ] ifFalse:[
         editorAndModel editorNeedsReturnKey ifTrue:[
             "/ only steal TAB and Curosr Keys from the editor
-            filter := [:aKey | #( #Tab #CursorUp #CursorDown ) includes:aKey ]
+            filter := [:aKey | #( #Tab #NonInsertingTab #BackTab #CursorUp #CursorDown ) includes:aKey ]
         ] ifFalse:[
             "/ steal TAB, RETURN and Curosr Keys from the editor
-            filter := [:aKey | #( #Tab #CursorUp #CursorDown #Return ) includes:aKey ]
+            filter := [:aKey | #( #Tab #NonInsertingTab #BackTab #CursorUp #CursorDown #Return ) includes:aKey ]
         ].
     ].
     keyBrdFwd := KeyboardForwarder 
@@ -4725,10 +4725,10 @@
 !DSVColumnView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.281 2013-01-11 10:45:31 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.282 2013-02-27 12:54:07 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.281 2013-01-11 10:45:31 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.282 2013-02-27 12:54:07 stefan Exp $'
 ! !