Index: TECH/File/impl/FileWriter.cls.xml =================================================================== diff -u -r3254 -r3260 --- TECH/File/impl/FileWriter.cls.xml (.../FileWriter.cls.xml) (revision 3254) +++ TECH/File/impl/FileWriter.cls.xml (.../FileWriter.cls.xml) (revision 3260) @@ -159,9 +159,9 @@ Set writer.Charset="UTF-8" Set writer.Indent= XMLExportOpties["indent" Set writer.NoXMLDeclaration =$$$Not(XMLDeclaration) - do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(writer.OutputToStream(..FileCharacterStream)) - do writer.RootObject(XMLObject, .TopTag) - quit + Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(writer.OutputToStream(..FileCharacterStream)) + Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(writer.RootObject(XMLObject, .TopTag)) + Quit ]]>