--- a/WorkspaceCompletionSupport.st	Sat May 31 04:36:23 2014 +0200
+++ b/WorkspaceCompletionSupport.st	Sun Jun 01 13:05:56 2014 +0200
@@ -30,7 +30,7 @@
 
 computeCompletions
 
-    |suggestions implementations actions anyFound contextOrNil|
+    |suggestions implementations actions contextOrNil|
 
     "/ a hack
     (editView topView isKindOf: DebugView) ifTrue:[
@@ -38,7 +38,6 @@
     ].
 
     UserInformation ignoreIn:[
-        anyFound := false.
         DoWhatIMeanSupport 
             codeCompletionFor: editView codeAspect
             language: editView editedLanguage
@@ -51,13 +50,11 @@
                     suggestions := listOfSuggestions collect:[:entry | entry isArray ifTrue:[entry first] ifFalse:[entry]].
                     implementations := listOfSuggestions collect:[:entry | entry isArray ifTrue:[entry second] ifFalse:[nil]].                            
                     actions := listOfActions.
-                    anyFound := true.
                     nil "/ must return nil to avoid DWIM to do it itself (for now)
             ]
     ].
-    "/ anyFound ifFalse:[self halt].
     "/ Transcript show:'suggestions: '; showCR:suggestions.
-    "/ Transcript show:'actions: '; showCR:actions.  
+    "/ Transcript show:'actions: '; showCR:actions. 
     editView sensor
         pushUserEvent:#'suggestionsArrived:implementations:actions:autoSelect:'
         for:self
@@ -239,10 +236,10 @@
 !WorkspaceCompletionSupport class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/WorkspaceCompletionSupport.st,v 1.7 2014-01-28 19:27:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/WorkspaceCompletionSupport.st,v 1.8 2014-06-01 11:05:56 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/WorkspaceCompletionSupport.st,v 1.7 2014-01-28 19:27:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/WorkspaceCompletionSupport.st,v 1.8 2014-06-01 11:05:56 cg Exp $'
 ! !