Index: TECH/File/impl/FileWriter.cls.xml
===================================================================
diff -u -r917 -r934
--- TECH/File/impl/FileWriter.cls.xml	(.../FileWriter.cls.xml)	(revision 917)
+++ TECH/File/impl/FileWriter.cls.xml	(.../FileWriter.cls.xml)	(revision 934)
@@ -162,6 +162,11 @@
 ]]></Implementation>
 </Method>
 
+<Method name="SetUTF8">
+<Implementation><![CDATA[	Set ..FileCharacterStream.TranslateTable="UTF8"
+]]></Implementation>
+</Method>
+
 <Method name="WriteStream">
 <FormalSpec>Stream:%Stream</FormalSpec>
 <ReturnType>%Status</ReturnType>
Index: TECH/File/FileWriter.cls.xml
===================================================================
diff -u -r913 -r934
--- TECH/File/FileWriter.cls.xml	(.../FileWriter.cls.xml)	(revision 913)
+++ TECH/File/FileWriter.cls.xml	(.../FileWriter.cls.xml)	(revision 934)
@@ -24,6 +24,10 @@
 <FormalSpec>XMLObject:%XML.Adaptor,XMLExportOpties:%String="literal,indent"</FormalSpec>
 </Method>
 
+<Method name="SetUTF8">
+<Abstract>1</Abstract>
+</Method>
+
 <Method name="WriteStream">
 <Abstract>1</Abstract>
 <FormalSpec>Stream:%Stream</FormalSpec>