--- a/RegressionTests__ZipArchiveTests.st	Sun Mar 24 13:27:42 2019 +0100
+++ b/RegressionTests__ZipArchiveTests.st	Sun Mar 24 13:28:53 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "{ Package: 'stx:goodies/regression' }"
 
 "{ NameSpace: RegressionTests }"
@@ -6,7 +8,7 @@
 	instanceVariableNames:''
 	classVariableNames:''
 	poolDictionaries:''
-	category:'tests-Regression-Files and Encodings'
+	category:'tests-Regression-File Formats'
 !
 
 
@@ -454,6 +456,8 @@
 !
 
 test01_notWorking
+    "verifies a concrete bug to be fixed"
+    
     |archive fileContents|
 
     archive := ZipArchive readingFrom:(self badZipArchiveDataFile readStream).
@@ -461,6 +465,7 @@
     self assert:(fileContents asString = (self strDatFromZipArchiveDataFile copyReplaceString:Character cr asString withString:String crlf))
 
     "Created: / 25-01-2011 / 22:49:10 / cg"
+    "Modified (comment): / 24-03-2019 / 13:28:42 / Claus Gittinger"
 ! !
 
 !ZipArchiveTests class methodsFor:'documentation'!