Index: TECH/File/impl/FileWriter.cls.xml
===================================================================
diff -u -r3258 -r3260
--- TECH/File/impl/FileWriter.cls.xml	(.../FileWriter.cls.xml)	(revision 3258)
+++ TECH/File/impl/FileWriter.cls.xml	(.../FileWriter.cls.xml)	(revision 3260)
@@ -160,7 +160,7 @@
 	Set writer.Indent= XMLExportOpties["indent"
 	Set writer.NoXMLDeclaration =$$$Not(XMLDeclaration)
 	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(writer.OutputToStream(..FileCharacterStream))
-	Do writer.RootObject(XMLObject, .TopTag) 
+	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(writer.RootObject(XMLObject, .TopTag))
 	Quit
 ]]></Implementation>
 </Method>