Index: /trunk/Include/Classes/System/Xml/XmlDocument.ab
===================================================================
--- /trunk/Include/Classes/System/Xml/XmlDocument.ab	(revision 462)
+++ /trunk/Include/Classes/System/Xml/XmlDocument.ab	(revision 463)
@@ -101,4 +101,5 @@
 		Dim xmlBuffer = calloc( length + 1 ) As *StrChar
 		inStream.Read( xmlBuffer As *Byte, 0, length )
+		inStream.Close()
 		Dim xmlString = New String( xmlBuffer )
 		free( xmlBuffer )
@@ -124,4 +125,5 @@
 		Dim xmlStr = InnerXmlSupportedIndent( True )
 		outStream.Write( xmlStr.StrPtr As *Byte, 0, xmlStr.Length * SizeOf( StrChar ) )
+		outStream.Close()
 	End Sub
 
@@ -134,8 +136,4 @@
 		Save( fileStream )
 	End Sub
-
-Private
-	Sub LoadXmlString( xmlString As String)
-	End Sub
 End Class