Index: TECH/PubSub/impl/EventDispatcher.cls.xml
===================================================================
diff -u -r1080 -r1083
--- TECH/PubSub/impl/EventDispatcher.cls.xml	(.../EventDispatcher.cls.xml)	(revision 1080)
+++ TECH/PubSub/impl/EventDispatcher.cls.xml	(.../EventDispatcher.cls.xml)	(revision 1083)
@@ -31,7 +31,7 @@
 			Set MaakEventCode = MaakEventCode _$C(13,10)_ "Do $ZOBJCLASSMETHOD("""_Subscription.RespondingClass_""", """_Subscription.RespondingMethod_""", Event)"
 
 			#dim LogDetail As %String = "Event: "_Event.Type_", Class: "_Subscription.RespondingClass_", Method: "_Subscription.RespondingMethod_", Data:"_$$LCVT^vhLib(SerializedObject)_$C(13,10,13,10)_"Reinvoke:"_$C(13,10)_MaakEventCode_$C(13,10,13,10)_"Error: "_$C(13,10)_Exception.ToString()
-			Set LogDetail=LogDetail_"Stack: "_$C(13,10)_$E(Exception.GeefStack(1),1,25000)
+			Set LogDetail=LogDetail_"Stack: "_$C(13,10)_$E(Exception.GeefStack(),1,25000)
 			Do Logger.ErrorMail(Exception.GeefOmschrijving(), LogDetail)
 						
 			if ##class(TECH.Config.ConfigMgr).Instance().GeefBoolean("TECH.PubSub.Rethrow_Exception") {