Index: TECH/Exceptions/Exception.cls.xml =================================================================== diff -u -r904 -r976 --- TECH/Exceptions/Exception.cls.xml (.../Exception.cls.xml) (revision 904) +++ TECH/Exceptions/Exception.cls.xml (.../Exception.cls.xml) (revision 976) @@ -93,8 +93,11 @@ Do TekstStream.WriteLine(Prefix_"Omschrijving: "_$$$TAB_..GeefOmschrijving()) if ..ExtraInfo.Size>0 { - do TekstStream.WriteLine(Prefix_"Extra info:"_$$$CRLF) - do TekstStream.CopyFrom(..ExtraInfo) + do TekstStream.WriteLine(Prefix_"Extra info:") + do ..ExtraInfo.Rewind() + while '..ExtraInfo.AtEnd { + do TekstStream.WriteLine(Prefix_$$$TAB_..ExtraInfo.ReadLine()) + } } Do TekstStream.WriteLine(Prefix_"ErrorCode: "_$$$TAB_..GeefExceptionCode())