--- a/Method.st	Mon May 15 19:49:44 2017 +0200
+++ b/Method.st	Tue May 16 11:01:56 2017 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -599,7 +601,7 @@
 
 nameSpace
     "Returns my namespace or nil. If no explicit method namespace
-     is set, my programmming language is used as default namespace
+     is set, my programming language is used as default namespace
      (for compatibility reasons, nil is returned for smalltalk methods,
      which means that the method is not namespaced).
     "
@@ -621,6 +623,7 @@
     "Created: / 26-04-2010 / 16:30:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 20-05-2010 / 09:38:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified (format): / 27-07-2012 / 14:17:09 / cg"
+    "Modified (comment): / 16-05-2017 / 11:00:42 / mawalch"
 !
 
 nameSpace: aNameSpace
@@ -1044,7 +1047,6 @@
     "Modified (format): / 18-11-2011 / 14:47:06 / cg"
 ! !
 
-
 !Method methodsFor:'accessing-visibility'!
 
 isIgnored
@@ -1966,7 +1968,7 @@
         (classAndSelector methodClass) name printOn:aStream.
         "/ print out in a form that can directly be evaluated (>> is a selector in Behavior)
         "/ in order to not break existing code which parses those strings,
-        "/ do not replace '>>' by ' » '
+        "/ do not replace '>>' by ' » '
         aStream nextPutAll:' >> '.
         (classAndSelector methodSelector) printOn:aStream.
     ] ifFalse:[
@@ -2002,7 +2004,7 @@
     who := self who.
     who notNil ifTrue:[
         "/ in order to not break existing code which parses those strings,
-        "/ do not replace '>>' by ' » '
+        "/ do not replace '>>' by ' » '
         ^ who methodClass name , ' >> ' , (who methodSelector storeString)
     ].
     ^ 'unboundMethod'
@@ -2031,7 +2033,7 @@
     "
      Method new whoStringWith:' >> '
      (Method compiledMethodAt:#whoString) whoStringWith:' >> '
-     (Method compiledMethodAt:#whoString) whoStringWith:' » '
+     (Method compiledMethodAt:#whoString) whoStringWith:' » '
      (Method compiledMethodAt:#whoString) whoStringWith:' -> '
     "
 ! !
@@ -3756,7 +3758,6 @@
     "Created: / 23-07-2012 / 11:16:36 / cg"
 ! !
 
-
 !Method methodsFor:'source management'!
 
 revisionInfo