Index: TECH/Mail/impl/MailAPI.cls.xml
===================================================================
diff -u -r916 -r919
--- TECH/Mail/impl/MailAPI.cls.xml	(.../MailAPI.cls.xml)	(revision 916)
+++ TECH/Mail/impl/MailAPI.cls.xml	(.../MailAPI.cls.xml)	(revision 919)
@@ -4,17 +4,15 @@
 <Super>TECH.Mail.MailAPI,%RegisteredObject</Super>
 
 <Method name="MaakNieuwMail">
-<FormalSpec>Verzender:%String="",Ontvanger:%String="",Onderwerp:%String="",Inhoud:%String=""</FormalSpec>
 <ReturnType>TECH.Mail.Mail</ReturnType>
-<Implementation><![CDATA[	Quit ##class(TECH.Mail.impl.Mail).%New(Verzender,Ontvanger,Onderwerp,Inhoud)
+<Implementation><![CDATA[	Quit ##class(TECH.Mail.impl.Mail).%New()
 ]]></Implementation>
 </Method>
 
 <Method name="MaakNieuwMailVoorICT">
-<FormalSpec>Verzender:%String="",Ontvanger:%String="",Onderwerp:%String="",Inhoud:%String=""</FormalSpec>
 <ReturnType>TECH.Mail.Mail</ReturnType>
 <Implementation><![CDATA[
-	Set Mail = ##class(TECH.Mail.impl.Mail).%New(Verzender,Ontvanger,Onderwerp,Inhoud)
+	Set Mail = ##class(TECH.Mail.impl.Mail).%New()
 	Do Mail.VoegToeOntvanger(##class(TECH.Config.ConfigMgr).Instance().GetString("TECH.Error.impl.ErrorHandler_DefaultMailAddress"))
 	Quit Mail
 ]]></Implementation>