#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Tue, 09 Oct 2018 12:46:02 +0200
changeset 18449 12de5f12886f
parent 18448 0fbeddf2a269
child 18450 d5a70e85a077
#BUGFIX by cg class: CodeCompletionHelpView changed: #keyPress:x:y:view:
CodeCompletionHelpView.st
--- a/CodeCompletionHelpView.st	Tue Oct 09 12:18:10 2018 +0200
+++ b/CodeCompletionHelpView.st	Tue Oct 09 12:46:02 2018 +0200
@@ -179,16 +179,21 @@
 
 keyPress:key x:x y:y view:aView
     key == #Escape ifTrue:[
+        self delayedClose.
+        ^ true.
+    ].
+    ( #( CursorUp CursorDown Return ) includes:key) ifFalse:[
         self installDelayedClose.
         ^ true.
-    ].    
+    ].
+    
 "/    (subViews notNil and:[aView == (subViews firstIfEmpty:nil)]) ifTrue:[
 "/        self topView destroy
 "/    ].
     ^ false
 
     "Created: / 04-08-2018 / 17:00:33 / Claus Gittinger"
-    "Modified: / 05-08-2018 / 03:13:52 / Claus Gittinger"
+    "Modified: / 08-10-2018 / 08:36:52 / Claus Gittinger"
 !
 
 pointerEnter:state x:x y:y view:view