# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1553430533 -3600
# Node ID 5c17f92676fb740af83aa88b4550f80c9ee4deb2
# Parent  30dfe8a8c58997df231b3f67b86d24a131ea5302
#DOCUMENTATION by cg
class: RegressionTests::ZipArchiveTests
class definition
comment/format in: #test01_notWorking

diff -r 30dfe8a8c589 -r 5c17f92676fb RegressionTests__ZipArchiveTests.st
--- 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'!