Index: vhLib/Logging.cls.xml
===================================================================
diff -u -r29 -r321
--- vhLib/Logging.cls.xml	(.../Logging.cls.xml)	(revision 29)
+++ vhLib/Logging.cls.xml	(.../Logging.cls.xml)	(revision 321)
@@ -175,7 +175,7 @@
 	If ( scSave ) && ( SendMail ) & ( Niveau '= "D" ) Do
 	. Set Body = oLog.GenMailBody()
 	. Do oLogger.GetMailFields(.From,.lbTo,.Subject,)
-	. Do SendMiniMail^vhLib.Mail(From,lbTo,Subject,Body,1,,,,)
+	. Do SendMiniMailForced^vhLib.Mail(From,lbTo,Subject,Body,1,,,,)
 	
 	If Niveau="D" Do oLog.DebugWindow()
 	
@@ -221,9 +221,9 @@
 ]]></Implementation>
 </Method>
 
-<Method name="AddErrorToLog">
+<Method name="AddErrorToLogXXXold">
 <Description>
-Set oLog=##class(VHSys.Logging).AddErrorToLog(Groep,Actie,Error,Detail)</Description>
+Set oLog=##class(vhLib.Logging).AddErrorToLog(Groep,Actie,Error,Detail)</Description>
 <ClassMethod>1</ClassMethod>
 <FormalSpec>Groep:%String,Actie:%String,Error,Detail:%String,blnSendMail:%Boolean=1</FormalSpec>
 <ReturnType>Logging</ReturnType>
@@ -235,7 +235,7 @@
 	Set Body=$$aelErrorMailBody()
 	Do Logging.GetMailFields(.From,.lbTo,.Subj,"Error")
 	Set:($ZError="<LIST>islist+2^%occRun")&&($$$GETERRORCODE(Error)=$$$GeneralError) lbTo=$LB("ICT_Meldingen@vanhoecke.be")   ; Does not provide any extra information 
-	Set sc=$$SendMiniMail^vhLib(From,lbTo,Subj,Body,,,,,)
+	Set sc=$$SendMiniMailForced^vhLib.Mail(From,lbTo,Subj,Body,,,,,)
 	Quit
 aelErrorMailBody()
 #define BodyTitle         "Error in "_..%ClassName(1)_" : "