--- a/TestCaseWithArguments.st	Wed May 29 01:12:49 2019 +0200
+++ b/TestCaseWithArguments.st	Wed May 29 01:13:02 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "{ Package: 'stx:goodies/sunit' }"
 
 "{ NameSpace: Smalltalk }"
@@ -84,8 +86,10 @@
 
 !TestCaseWithArguments methodsFor:'private'!
 
-performTest
+invokeTestMethod
     self perform:(testSelector asSymbol) withArguments:(testArguments)
+
+    "Created: / 29-05-2019 / 00:40:11 / Claus Gittinger"
 !
 
 setTestSelector:aSymbol setTestArguments: args