--- a/EditTextViewCompletionSupport.st Thu Oct 31 10:26:45 2019 +0100
+++ b/EditTextViewCompletionSupport.st Sat Nov 02 01:25:05 2019 +0100
@@ -80,6 +80,11 @@
handleKeyPress:key x:x y:y
"return true, if I have eaten this keypress"
+ <resource: #keyboard ( #'Control_L' #Ctrl #'Control_R' #Control
+ #Tab #CursorDown #CursorUp #CursorLeft #CursorRight #Return
+ #Escape #BackSpace
+ #'Shift_L' #'Shift_R' #Shift) >
+
|ch eatCursorLeftOrRight eatCursorUpDown sensor|
"/ completeImmediate := UserPreferences current immediateCodeCompletion.
@@ -177,6 +182,8 @@
!
postKeyPress:key
+ <resource: #keyboard ( #'BasicBackspace' #BackSpace)>
+
|doComplete ch w|
UserPreferences current immediateCodeCompletion ifFalse:[