Index: svn/Repository/CodeRepository.cls.xml =================================================================== diff -u -r1798 -r1829 --- svn/Repository/CodeRepository.cls.xml (.../CodeRepository.cls.xml) (revision 1798) +++ svn/Repository/CodeRepository.cls.xml (.../CodeRepository.cls.xml) (revision 1829) @@ -115,6 +115,7 @@ if Result set Result = InternalName'["/" if Result set Result = $$$Not(##class(TECH.StringUtils).StartsWith(InternalName,"vhTestFiles")) if Result set Result = $$$Not(##class(TECH.StringUtils).EndsWith(InternalName,".prj")) + if Result set Result = $$$Not(InternalName = "000GetLatestLijst.csv") quit Result ]]> @@ -132,7 +133,7 @@ else { set Status = ..ImportNonRoutine(ExternalName) if ##class(TECH.SourceCodeUtils).Type(InternalName) = "class" { - do:##class(svn.Setting).MagUnitTestUitvoeren() ##class(svn.UnitTestAnalyser).%New(##class(TECH.SourceCodeUtils).StripExtension(InternalName)).StoreUnitTestInfo() + do:##class(svn.Setting).MagUnitTestUitvoeren() ##class(svn.UnitTestAnalyser).%New(##class(TECH.SourceCodeUtils).StripExtension(InternalName)).StoreUnitTestInfo() } } Do ##class(svn.Event.SourceCodeSaved).Raise(InternalName) @@ -155,13 +156,7 @@ set File.Filename=ExternalName do Routine.Clear() while 'File.AtEnd { - #dim Line As %String = File.ReadLine() - - if 'File.AtEnd { - do Routine.WriteLine(Line) - } else { - do Routine.Write(Line) - } + do Routine.WriteLine(File.ReadLine()) } set Status = Routine.Save()