Index: vhUnitTest/TECH/MailUtils.cls.xml
===================================================================
diff -u -r1995 -r1996
--- vhUnitTest/TECH/MailUtils.cls.xml	(.../MailUtils.cls.xml)	(revision 1995)
+++ vhUnitTest/TECH/MailUtils.cls.xml	(.../MailUtils.cls.xml)	(revision 1996)
@@ -11,10 +11,10 @@
 <Implementation><![CDATA[
 	Do ##class(TECH.MailUtils).ClearCacheNsLookUp()
 
-	Set CacheNsLookUp = 1
-	Set NsLookUp = 1 
-	
-	
+	#dim CacheNsLookUp As %Boolean = 1
+	#dim NsLookUp As %Boolean = 1
+	#dim mail As %String
+
 	Set mail = "sjonslutter@xs4all.nl"
 	Do $$$AssertTrue(##class(TECH.MailUtils).Check(mail,NsLookUp,CacheNsLookUp),"Emailadres "_mail_" is goed getest.")	
 	Set mail = "Joren.Blancquaert@skynet.12"