Index: TECH/File/impl/FileReader.cls.xml
===================================================================
diff -u -r2525 -r2526
--- TECH/File/impl/FileReader.cls.xml	(.../FileReader.cls.xml)	(revision 2525)
+++ TECH/File/impl/FileReader.cls.xml	(.../FileReader.cls.xml)	(revision 2526)
@@ -12,7 +12,7 @@
 </Property>
 
 <Property name="Stream">
-<Type>%Stream.Object</Type>
+<Type>%FileCharacterStream</Type>
 <Private>1</Private>
 </Property>
 
@@ -22,6 +22,7 @@
 <FormalSpec>Bestand:%String</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	
 	Set ..Bestand = Bestand
 	
 	If ##class(TECH.File).Exists(..Bestand)
@@ -81,6 +82,9 @@
 </Method>
 
 <Method name="%OnClose">
+<Description><![CDATA[
+This callback method is invoked by the <METHOD>%Close</METHOD> method to 
+provide notification that the current object is being closed.]]></Description>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>