--- a/EditTextView.st	Wed Sep 04 19:22:04 2013 +0200
+++ b/EditTextView.st	Wed Sep 04 21:53:48 2013 +0200
@@ -4768,7 +4768,9 @@
 
     "/ experimental
     immediateCompletion := UserPreferences current immediateCodeCompletion.
-    (immediateCompletion or:[UserPreferences current codeCompletionOnControlKey]) ifTrue:[
+    (immediateCompletion 
+    or:[UserPreferences current codeCompletionOnControlKey
+    or:[UserPreferences current codeCompletionOnTabKey]]) ifTrue:[
         completionService isNil ifTrue:[
             self initializeCodeCompletionService.            
         ].
@@ -4834,7 +4836,7 @@
             self deleteCharBeforeCursor.
 "/          ].
         ].
-        immediateCompletion ifTrue:[ 
+        true "immediateCompletion" ifTrue:[ 
             completionService notNil ifTrue:[ completionService postKeyPress:key].
         ].
         ^ self
@@ -8255,10 +8257,10 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.575 2013-09-03 14:35:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.576 2013-09-04 19:53:48 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.575 2013-09-03 14:35:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.576 2013-09-04 19:53:48 cg Exp $'
 ! !