Index: TECH/PubSub/impl/EventDispatcher.cls.xml
===================================================================
diff -u -r2957 -r2959
--- TECH/PubSub/impl/EventDispatcher.cls.xml	(.../EventDispatcher.cls.xml)	(revision 2957)
+++ TECH/PubSub/impl/EventDispatcher.cls.xml	(.../EventDispatcher.cls.xml)	(revision 2959)
@@ -101,7 +101,7 @@
 		#dim EventDataClassname As %String = $classname(Event.Data)
 		#dim XmlStream As %Stream.Object = ..GeefGeserializeerdeStream(Event)
 
-		do LogDetail.Write("Event: "_Event.Type_", Class: "_Subscription.RespondingClass_", Method: "_Subscription.RespondingMethod_", Data:")		
+		do LogDetail.WriteLine("Event: "_Event.Type_", Class: "_Subscription.RespondingClass_", Method: "_Subscription.RespondingMethod_", Data:")		
 		
 		do LogDetail.CopyFrom(XmlStream)
 		
@@ -118,7 +118,8 @@
 		
 		do LogDetail.WriteLine("")
 		do LogDetail.WriteLine("Error: ")
-		do LogDetail.WriteLine(Exception.ToString())
+
+		do LogDetail.CopyFrom(Exception.ToStream())
 		
 		do LogDetail.WriteLine("")
 		do LogDetail.WriteLine("Stack: ")