Index: TECH/PubSub/impl/EventDispatcher.cls.xml
===================================================================
diff -u -r1074 -r2182
--- TECH/PubSub/impl/EventDispatcher.cls.xml	(.../EventDispatcher.cls.xml)	(revision 1074)
+++ TECH/PubSub/impl/EventDispatcher.cls.xml	(.../EventDispatcher.cls.xml)	(revision 2182)
@@ -20,7 +20,8 @@
 DispatchError
 			Set $ZTRAP=""
 			Set Logger = ##class(TECH.PubSub.impl.PubSubLogger).%New()
-			Do Logger.ErrorMail("Foutieve subscription","Event: "_Event.Type_", Class: "_Subscription.RespondingClass_", Method: "_Subscription.RespondingMethod_", Error: "_$ZE)
+			Set Exception = ##class(TECH.ExceptionHandler).Catch()
+			Do Logger.ErrorMail("Foutieve subscription","Event: "_Event.Type_", Class: "_Subscription.RespondingClass_", Method: "_Subscription.RespondingMethod_", Error: "_$C(13,10)_Exception.ToString())
 EindeIf
 		}
 		Else {