--- a/ChangesBrowser.st	Thu Feb 02 21:37:09 2012 +0100
+++ b/ChangesBrowser.st	Fri Feb 03 11:03:37 2012 +0100
@@ -2756,7 +2756,8 @@
             ^ false
         ].
 
-        outStream nextPutLine:'"{ Encoding: utf8 }" !!'.
+        outStream nextPutLine:'''---- encoding: utf8 ----''!!'.
+"/        outStream nextPutLine:'"{ Encoding: utf8 }" !!'.
         outStream := EncodedStream stream:outStream encoder:(CharacterEncoder encoderForUTF8).
 
         encoding := CharacterEncoder guessEncodingOfStream:inStream.
@@ -2837,8 +2838,8 @@
 
     ^ true
 
-    "Modified: / 2.12.1996 / 22:29:15 / stefan"
-    "Modified: / 21.4.1998 / 17:50:11 / cg"
+    "Modified: / 02-12-1996 / 22:29:15 / stefan"
+    "Modified: / 03-02-2012 / 11:01:20 / cg"
 ! !
 
 !ChangesBrowser methodsFor:'private-user interaction ops'!
@@ -5836,6 +5837,9 @@
         timeStampInfo := (chunkText copyFrom:16 to:(chunkText size - 6)) withoutSpaces.
         ^ self.
     ].
+    (chunkText asLowercase startsWith:'''---- encoding: ') ifTrue:[
+        ^ self.
+    ].
 
     changeChunks add:chunkText.
     changeClassNames add:nil.
@@ -5866,6 +5870,8 @@
             changeHeaderLines add:headerLine
         ]
     ]
+
+    "Modified: / 03-02-2012 / 11:02:36 / cg"
 !
 
 processMethodChunkIfNone:emptyBlock
@@ -6341,9 +6347,9 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.416 2012-01-03 14:34:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.417 2012-02-03 10:03:37 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.416 2012-01-03 14:34:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.417 2012-02-03 10:03:37 cg Exp $'
 ! !