--- a/EditTextView.st	Sat Nov 15 16:10:59 2014 +0100
+++ b/EditTextView.st	Mon Nov 17 23:50:13 2014 +0100
@@ -5542,8 +5542,15 @@
       - change any display attributes as req'd."
 
     super showNoFocus:explicit.
-    completionSupport notNil ifTrue:[
-        completionSupport release.
+
+    "/ cg: only do this for an explicit change (i.e. by tabbing),
+    "/ not when the focus is lost normally (because this also happens when
+    "/ the completion-menu is clicked on), and we don't want to kill the
+    "/ completer. Otherwise, completion does not work when clocking into the list.
+    explicit ifTrue:[
+        completionSupport notNil ifTrue:[
+            completionSupport release.
+        ].
     ].
 !
 
@@ -8653,10 +8660,10 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.624 2014-11-15 13:12:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.625 2014-11-17 22:50:13 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.624 2014-11-15 13:12:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.625 2014-11-17 22:50:13 cg Exp $'
 ! !