Index: svn/Helper.cls.xml =================================================================== diff -u -r1548 -r1549 --- svn/Helper.cls.xml (.../Helper.cls.xml) (revision 1548) +++ svn/Helper.cls.xml (.../Helper.cls.xml) (revision 1549) @@ -138,10 +138,11 @@ } Do SvnHelper.Failed.Clear() }Catch E{ + #dim ServerNaam As %String = ##class(TECH.Context.RuntimeContext).Instance().GeefNamespace() #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() - #dim From As %String = $$$SystemMail($$$Server_" - Subversion") + #dim From As %String = $$$SystemMail(ServerNaam_" - Subversion") #dim MailTo As %String = $listbuild($$$SVNGlobal("SourceControl","SVN","MailWhenFailed")) - Do SendMiniMailForced^vhLib.Mail(From,MailTo,"Subversion GetLatest() failed on ["_$$$Server_"]",Exception.ToString(),0) + Do SendMiniMailForced^vhLib.Mail(From,MailTo,"Subversion GetLatest() failed on ["_ServerNaam_"]",Exception.ToString(),0) } Set $$$SVNGlobal("SourceControl","SVN","UnitTestInProcess") = 0 ]]>