--- 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 $'
! !