--- a/Class.st	Mon Jun 19 16:52:45 2017 +0200
+++ b/Class.st	Mon Jun 19 17:30:41 2017 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	       All Rights Reserved
@@ -5543,7 +5541,7 @@
 
     oldPos := aStream position.
     Stream positionErrorSignal handle:[:ex |
-        'Class [info]: position error when accessing source' infoPrintCR.
+        ('Class [info]: position error when accessing source for ',self name) infoPrintCR.
         ^ false
     ] do:[
         aStream position:pos-1.
@@ -5552,11 +5550,11 @@
     aStream position:oldPos.
 
     (src isEmptyOrNil) ifTrue:[
-        'Class [info]: empty source for version-method' infoPrintCR.
+        ('Class [info]: empty source for version-method in ',self name) infoPrintCR.
         ^ false
     ].
     (src startsWith:'version') ifFalse:[
-        'Class [info]: corrupted source (source does not correspond to binary)' infoPrintCR.
+        ('Class [info]: corrupted source (source does not correspond to binary) in ',self name) infoPrintCR.
         ^ false
     ].
 
@@ -5567,7 +5565,7 @@
     ].
 
     versionFromSource isNil ifTrue:[
-        'Class [info]: version-from source is nil' infoPrintCR.
+        ('Class [info]: version-from source is nil in ',self name) infoPrintCR.
         ^ false
     ].
 
@@ -5581,11 +5579,10 @@
             ^ true
         ].
     ].
-    'Class [info]: source-version is different from binaryRevision' infoPrintCR.
+    ('Class [info]: source-version is different from binaryRevision in ',self name) infoPrintCR.
     ^ false
 
-    "Modified: / 29-09-2011 / 14:29:55 / cg"
-    "Modified (format): / 13-02-2017 / 19:57:54 / cg"
+    "Modified: / 19-06-2017 / 17:30:17 / cg"
 !
 
 versionMethodTemplateForSourceCodeManager:aSourceCodeManager