--- a/Tools__MethodList.st	Wed Mar 09 14:10:52 2016 +0100
+++ b/Tools__MethodList.st	Wed Mar 09 18:15:54 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
     ].