Index: TECH/Mail/impl/SMTPVerzender.cls.xml
===================================================================
diff -u -r1593 -r2442
--- TECH/Mail/impl/SMTPVerzender.cls.xml	(.../SMTPVerzender.cls.xml)	(revision 1593)
+++ TECH/Mail/impl/SMTPVerzender.cls.xml	(.../SMTPVerzender.cls.xml)	(revision 2442)
@@ -27,7 +27,6 @@
 <Method name="Verzend">
 <FormalSpec>Mail:TECH.Mail.Mail</FormalSpec>
 <Implementation><![CDATA[
-	
 	Set ..SMTP = ##class(%Net.SMTP).%New()
 	Set ..SMTP.smtpserver=..GeefSMTPServer()
 
@@ -120,9 +119,9 @@
 	
 	#dim RedirectTo As %String
 	#dim GebruikerInitialen As %String =##class(TECH.Context.RuntimeContext).Instance().GeefGebruikerInitialen()
-	If ($$USERID^vhUSER(GebruikerInitialen) '= "") {
+	If (GebruikerInitialen) '= "" {
 		Set RedirectTo = GebruikerInitialen_"@vanhoecke.be"
-	}Else{
+	} Else {
 		Set RedirectTo = ##class(TECH.Config.ConfigMgr).Instance().GetString("TECH.Mail.DefaultRedirectMailAddress")
 	}
 	If $length(RedirectTo) do ..MailMessage.To.Insert(RedirectTo)