Index: TECH/Console/impl/MailConsole.cls.xml
===================================================================
diff -u -r3038 -r3384
--- TECH/Console/impl/MailConsole.cls.xml	(.../MailConsole.cls.xml)	(revision 3038)
+++ TECH/Console/impl/MailConsole.cls.xml	(.../MailConsole.cls.xml)	(revision 3384)
@@ -57,11 +57,18 @@
 <Method name="SendStream">
 <Private>1</Private>
 <Implementation><![CDATA[
-	if ..Stream.Size {
-		#dim Mail As TECH.Mail.Mail = ..MailApi.MaakNieuwMailVoorICT()
-		do Mail.ZetOnderwerp("Console log")
-		do Mail.ZetInhoudStream(..Stream)
-		do ..MailApi.VerstuurMail(Mail)
+	Try {
+		if ..Stream.Size {
+			#dim Mail As TECH.Mail.Mail = ..MailApi.MaakNieuwMailVoorICT()
+			do Mail.ZetOnderwerp("Console log")
+			do Mail.ZetInhoudStream(..Stream)
+			do ..MailApi.VerstuurMail(Mail)
+		} 
+	} Catch { 
+		Do ##class(vhLib.Logger).%New().LogExceptie(##class(TECH.ExceptionHandler).Catch()) 
+		Try {
+			Do ##class(vhLib.Logger).%New().Warning("MailConsole::SendStream", ..Stream, 0)
+		} Catch { Do ##class(vhLib.Logger).%New().LogExceptie(##class(TECH.ExceptionHandler).Catch()) }
 	}
 ]]></Implementation>
 </Method>