Index: TECH/MailUtils.cls.xml
===================================================================
diff -u -r1994 -r2441
--- TECH/MailUtils.cls.xml	(.../MailUtils.cls.xml)	(revision 1994)
+++ TECH/MailUtils.cls.xml	(.../MailUtils.cls.xml)	(revision 2441)
@@ -143,15 +143,15 @@
 <FormalSpec>NsLookUp:%String,MailDomainPart:%String,HandleMethod:%String</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	Set FileName = "NSLOOKUP"_$job
-	Do DELFILE^vhDEV("c:\",FileName)
+	#dim FileName = "NSLOOKUP"_$job
+	Do DELFILE^vhLib.Files("c:\",FileName)
 	Set Exec = NsLookUp_ " "_MailDomainPart_" > c:\"_FileName
 	s Ok=$ZF(-1,Exec)
 	Set %NsLookUp=0
-	Set FileName=$$READ^vhDEV("c:\",FileName,"D`##class("_..%ClassName(1)_")."_HandleMethod_"","M")
+	Set FileName=$$READ^vhLib.Files("c:\",FileName,"D`##class("_..%ClassName(1)_")."_HandleMethod_"","M")
 	Set Status = %NsLookUp
 	Set:'Status Status = $$$ERROR($$$GeneralError,"Niet bestaand domein.")
-	Do DELFILE^vhDEV("c:\",FileName)
+	Do DELFILE^vhLib.Files("c:\",FileName)
 	Kill %NsLookUp	
 	Set %NsLookUps(MailDomainPart) = Status
 	Quit Status