Index: vhTest/Spy/TECH/Logging/impl/LoggingAPI.cls.xml
===================================================================
diff -u -r3245 -r3246
--- vhTest/Spy/TECH/Logging/impl/LoggingAPI.cls.xml	(.../LoggingAPI.cls.xml)	(revision 3245)
+++ vhTest/Spy/TECH/Logging/impl/LoggingAPI.cls.xml	(.../LoggingAPI.cls.xml)	(revision 3246)
@@ -26,11 +26,12 @@
 <FormalSpec>Niveau:%String,Groep:%String,Actie:%String,Detail:%CacheString,blnSendMail:%Boolean=0,Logger:vhLib.Logger=""</FormalSpec>
 <ReturnType>vhLib.Logging</ReturnType>
 <Implementation><![CDATA[
-	Set oLog=..%New()
+	Set oLog = ##class(vhLib.Logging).%New()
 	#dim Datum,Tijd,ProgLabel As %String
 	Do oLog.Init(.Datum,.Tijd,.Niveau,.Groep,.Actie,.Detail,.ProgLabel)
 	Do:$$$Not(..LogItems.IsDefined(Niveau)) ..LogItems.SetAt(##class(%ListOfDataTypes).%New(),Niveau)
 	Do ..LogItems.GetAt(Niveau).Insert(oLog)
+	Quit oLog
 ]]></Implementation>
 </Method>