Index: Tools/Test/TestCase.cls.xml =================================================================== diff -u -r1208 -r1211 --- Tools/Test/TestCase.cls.xml (.../TestCase.cls.xml) (revision 1208) +++ Tools/Test/TestCase.cls.xml (.../TestCase.cls.xml) (revision 1211) @@ -356,6 +356,13 @@ } ]]> + + +FileInfo:TECH.FileInfo +%Boolean + + Index: Tools/Test/Asserter.cls.xml =================================================================== diff -u -r1208 -r1211 --- Tools/Test/Asserter.cls.xml (.../Asserter.cls.xml) (revision 1208) +++ Tools/Test/Asserter.cls.xml (.../Asserter.cls.xml) (revision 1211) @@ -269,22 +269,14 @@ set itFiles = ##class(TECH.ListIterator).%New(FileList) while ( itFiles.HasNext() ) && ( RecentAangepast ) { #dim File As TECH.FileInfo = itFiles.Next() - if ..ControleBestandNodigOpRecenteAanpassing(File) { + if ..TestCase.ControleBestandNodigOpRecenteAanpassing(File) { set RecentAangepast = '##class(TECH.Comparator.TimeStampComparator).%New().IsKleinerDan(File.DateModified,..TestCase.StartTime) } } quit RecentAangepast ]]> - -FileInfo:TECH.FileInfo -1 -%Boolean - - - aAutoQuoted:%String,status:%String,aMessage:%String %Status