Index: csp/getpage.cls.xml =================================================================== diff -u -r2588 -r3105 --- csp/getpage.cls.xml (.../getpage.cls.xml) (revision 2588) +++ csp/getpage.cls.xml (.../getpage.cls.xml) (revision 3105) @@ -27,13 +27,15 @@ #define EmailTo "wv@vanhoecke.be" Do ##class(csp.errorvh).DefaultEHandlerInit(.lbErrTypes) - If (##class(TECH.Config.ConfigMgr).Instance().GetOmgeving()="PROD") { - Set %cspEHandler($$$etPageLoadError,"ACTIONS")=$LB("Email","ErrPage","LogDB") - } - Else { + + If ##class(TECH.Config.ConfigMgr).Instance().GetBoolean("ProductLinks.csp_MailSturenBijCspError")=0 { // Aangepast door WimV op 22/11/2011 + // In development geen mail sturen, maar de full csp-error tonen Set %cspEHandler($$$etPageLoadError,"ACTIONS")=$LB("ErrPage") } - + Else { + Set %cspEHandler($$$etPageLoadError,"ACTIONS")=$LB("Email","ErrPage","LogDB") + } + Set %cspEHandler($$$etPageLoadError,"ACTIONS","LogDB")=$LB("DFL","TBX_Err_CSP",$LB("CustomLogError","cspBasis.GAProdTBox",1)) Set %cspEHandler($$$etPageLoadError,"ACTIONS","Email")=$LB("""CSPserver "_$system.Server.HostName()_""" ",$LB($$$EmailTo),"CSP - Error - "_$ZDT($H,4),"§DFL_HTML§",,1) Set %cspEHandler($$$etPageLoadError,"ACTIONS","ErrPage")=$LB("%CSP.Error","OnPage") ; $LB("","OnPageMinimum")