DoWhatIMeanSupport.st
changeset 5081 5478311e8ee5
parent 5080 0842b08b7040
child 5082 87e1ffeceb8a
--- a/DoWhatIMeanSupport.st	Sat May 07 12:37:59 2016 +0200
+++ b/DoWhatIMeanSupport.st	Sat May 07 21:35:22 2016 +0200
@@ -3054,10 +3054,8 @@
 codeCompletionForVariable:node into:actionBlock
     |nonMetaClass crsrPos nm parent
      allVariables allDistances variablesAlreadyAdded nodeVal
-     char oldLen newLen
-     getDistanceComputeBlockWithWeight addWithFactorBlock allTheBest bestAssoc
-     globalFactor localFactor selectorOfMessageToNode implementors argIdx namesUsed kwPart
-     editAction editActions suggestions nameIsOK longerNames setOfNames otherArgNames
+     char getDistanceComputeBlockWithWeight addWithFactorBlock allTheBest bestAssoc
+     globalFactor localFactor selectorOfMessageToNode implementors argIdx namesUsed kwPart editActions suggestions nameIsOK longerNames setOfNames otherArgNames
      suggestionsWithInfo isLeftSideOfAssignment|
  
     "/ Transcript show:'var in '; show:methodOrNil; show:' / '; showCR:classOrNil.
@@ -3617,7 +3615,7 @@
                 ].
             ].
 
-    editActions := suggestionsWithInfo collect:[:word |
+    editActions := suggestions collect:[:word |
                      self editActionToReplaceNode:node by:word.
                    ].        
     actionBlock value:suggestionsWithInfo value:editActions value:nil.