Index: svn/Command.cls.xml =================================================================== diff -u -r1558 -r1606 --- svn/Command.cls.xml (.../Command.cls.xml) (revision 1558) +++ svn/Command.cls.xml (.../Command.cls.xml) (revision 1606) @@ -137,6 +137,11 @@ "0" + +%String +list + + 1 1 @@ -400,8 +405,9 @@ set File = ##class(%FileCharacterStream).%New() set File.Filename = Filename while 'File.AtEnd { - set Line = File.ReadLine() - write Line,! + #dim Line As %String = File.ReadLine() + do ..Errors.Insert(Line) + write Line,! } do ##class(%File).Delete(Filename) ]]> @@ -469,6 +475,9 @@ CallOut + +Errors + GlobalOptions Index: svn/Repository.cls.xml =================================================================== diff -u -r1604 -r1606 --- svn/Repository.cls.xml (.../Repository.cls.xml) (revision 1604) +++ svn/Repository.cls.xml (.../Repository.cls.xml) (revision 1606) @@ -150,6 +150,10 @@ set tCmdDelim="&" set tSC=$$$OK + if svnCommand.Errors.Size { + do ##class(TECH.ListUtils).CopyListOfDataTypes(svnCommand.Errors,..Failed) + } + set tResult=svnCommand.Result do tResult.Rewind() while tResult.AtEnd=0 {