diff -r fb39152235e3 -r 9b9fa51009d2 Tools__MethodList.st --- a/Tools__MethodList.st Wed Mar 09 06:56:29 2016 +0100 +++ b/Tools__MethodList.st Thu Mar 10 06:57:38 2016 +0100 @@ -1,3 +1,5 @@ +"{ Encoding: utf8 }" + " COPYRIGHT (c) 2000 by eXept Software AG All Rights Reserved @@ -1348,16 +1350,16 @@ ! method:mthd includesRefsToVariable:variablesToHighLight askParserWith:querySelector - |cls src parser usedVars anyVarNameAccessable| + |cls src parser usedVars anyVarNameAccessible| cls := mthd mclass. cls isNil ifTrue:[^ false]. - anyVarNameAccessable := cls allInstVarNames includesAny:variablesToHighLight. - anyVarNameAccessable ifFalse:[ - anyVarNameAccessable := cls theNonMetaclass allClassVarNames includesAny:variablesToHighLight. + anyVarNameAccessible := cls allInstVarNames includesAny:variablesToHighLight. + anyVarNameAccessible ifFalse:[ + anyVarNameAccessible := cls theNonMetaclass allClassVarNames includesAny:variablesToHighLight. ]. - anyVarNameAccessable ifFalse:[ + anyVarNameAccessible ifFalse:[ "/ no need to parse ^ false ].