Index: vhLib/Logger.cls.xml
===================================================================
diff -u -r1600 -r2062
--- vhLib/Logger.cls.xml	(.../Logger.cls.xml)	(revision 1600)
+++ vhLib/Logger.cls.xml	(.../Logger.cls.xml)	(revision 2062)
@@ -4,7 +4,7 @@
 <ClassType/>
 <IncludeCode>vhLib.Macro</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>%RegisteredObject</Super>
+<Super>TECH.Mockable</Super>
 
 <Property name="Groep">
 <Type>%String</Type>
@@ -75,56 +75,56 @@
 
 <Method name="AddToLog">
 <FormalSpec>Niveau:%String,Actie:%String,Detail:%String,blnSendMail:%Boolean=0</FormalSpec>
-<ReturnType>Logging</ReturnType>
+<ReturnType>vhLib.Logging</ReturnType>
 <Implementation><![CDATA[	Quit ..LoggingAPI.MaakLogItem(Niveau,..Groep,Actie,Detail,blnSendMail,%this)
 ]]></Implementation>
 </Method>
 
 <Method name="Warning">
 <FormalSpec>Actie:%String,Detail:%String,blnSendMail:%Boolean=0</FormalSpec>
-<ReturnType>Logging</ReturnType>
+<ReturnType>vhLib.Logging</ReturnType>
 <Implementation><![CDATA[	Quit ..AddToLog(##class(vhLib.enu.LogNiveau).Warning(), .Actie, .Detail , blnSendMail )
 ]]></Implementation>
 </Method>
 
 <Method name="WarningMail">
 <FormalSpec>Actie:%String,Detail:%String</FormalSpec>
-<ReturnType>Logging</ReturnType>
+<ReturnType>vhLib.Logging</ReturnType>
 <Implementation><![CDATA[	Quit ..AddToLog(##class(vhLib.enu.LogNiveau).Warning(), .Actie, .Detail , 1 )
 ]]></Implementation>
 </Method>
 
 <Method name="Error">
 <FormalSpec>Actie:%String,Detail:%String,blnSendMail:%Boolean=0</FormalSpec>
-<ReturnType>Logging</ReturnType>
+<ReturnType>vhLib.Logging</ReturnType>
 <Implementation><![CDATA[	Quit ..AddToLog(##class(vhLib.enu.LogNiveau).Error(),.Actie, .Detail , blnSendMail )
 ]]></Implementation>
 </Method>
 
 <Method name="ErrorMail">
 <FormalSpec>Actie:%String,Detail:%String</FormalSpec>
-<ReturnType>Logging</ReturnType>
+<ReturnType>vhLib.Logging</ReturnType>
 <Implementation><![CDATA[	Quit ..AddToLog(##class(vhLib.enu.LogNiveau).Error(),.Actie, .Detail , 1 )
 ]]></Implementation>
 </Method>
 
 <Method name="Debug">
 <FormalSpec>Actie:%String,Detail:%String,blnSendMail:%Boolean=0</FormalSpec>
-<ReturnType>Logging</ReturnType>
+<ReturnType>vhLib.Logging</ReturnType>
 <Implementation><![CDATA[	Quit ..AddToLog(##class(vhLib.enu.LogNiveau).Debug(),.Actie, .Detail , blnSendMail )
 ]]></Implementation>
 </Method>
 
 <Method name="InfoMail">
 <FormalSpec>Actie:%String,Detail:%String</FormalSpec>
-<ReturnType>Logging</ReturnType>
+<ReturnType>vhLib.Logging</ReturnType>
 <Implementation><![CDATA[	Quit ..AddToLog(##class(vhLib.enu.LogNiveau).Information(),.Actie, .Detail , 1 )
 ]]></Implementation>
 </Method>
 
 <Method name="Info">
 <FormalSpec>Actie:%String,Detail:%String,blnSendMail:%Boolean=0</FormalSpec>
-<ReturnType>Logging</ReturnType>
+<ReturnType>vhLib.Logging</ReturnType>
 <Implementation><![CDATA[	Quit ..AddToLog(##class(vhLib.enu.LogNiveau).Information(),.Actie, .Detail , blnSendMail )
 ]]></Implementation>
 </Method>