Index: vhUnitTest/TECH/MailUtils.cls.xml
===================================================================
diff -u -r1996 -r2619
--- vhUnitTest/TECH/MailUtils.cls.xml	(.../MailUtils.cls.xml)	(revision 1996)
+++ vhUnitTest/TECH/MailUtils.cls.xml	(.../MailUtils.cls.xml)	(revision 2619)
@@ -49,7 +49,7 @@
 	Do $$$AssertTrue(##class(TECH.MailUtils).Check(mail,NsLookUp,CacheNsLookUp),"Emailadres "_mail_" is goed getest.")
 	Set mail = "Joren.Blancq.uae123rt@skynet.be"
 	Do $$$AssertTrue(##class(TECH.MailUtils).Check(mail,NsLookUp,CacheNsLookUp),"Emailadres "_mail_" is goed getest.")
-	Set mail = "Joren.Blancq.uae123rt@skynet.be.abc"
+	Set mail = "Joren.Blancq.uae123rt@skynet.be.abcd"
 	Do $$$AssertFalse(##class(TECH.MailUtils).Check(mail,NsLookUp,CacheNsLookUp),"Emailadres "_mail_" is goed getest.")
 	Set mail = "Joren  Blancquaert@skynet.be"
 	Do $$$AssertFalse(##class(TECH.MailUtils).Check(mail,NsLookUp,CacheNsLookUp),"Emailadres "_mail_" is goed getest.")