Rombobjörn

summaryrefslogtreecommitdiff
path: root/milter_api.ads
diff options
context:
space:
mode:
Diffstat (limited to 'milter_api.ads')
-rw-r--r--milter_api.ads16
1 files changed, 8 insertions, 8 deletions
diff --git a/milter_api.ads b/milter_api.ads
index 3e37163..8a4facf 100644
--- a/milter_api.ads
+++ b/milter_api.ads
@@ -127,7 +127,7 @@ package Milter_API is
-- called when the client sends a HELO or EHLO command
-- corresponds to xxfi_helo
- type Envelope_Sender_Handler is access function
+ type Sender_Handler is access function
(Context : SMFICTX_Pointer; -- the opaque context handle
Sender : String; -- the envelope sender address
Arguments : Arguments_Handle) -- ESMTP arguments to the MAIL command
@@ -135,7 +135,7 @@ package Milter_API is
-- called once at the beginning of each message
-- corresponds to xxfi_envfrom
- type Envelope_Recipient_Handler is access function
+ type Recipient_Handler is access function
(Context : SMFICTX_Pointer; -- the opaque context handle
Recipient : String; -- an envelope recipient address
Arguments : Arguments_Handle) -- ESMTP arguments to the RCPT command
@@ -217,8 +217,8 @@ package Milter_API is
(Name : String;
Connected : Connect_Handler := null;
Helo : Helo_Handler := null;
- Envelope_Sender : Envelope_Sender_Handler := null;
- Envelope_Recipient : Envelope_Recipient_Handler := null;
+ Sender : Sender_Handler := null;
+ Recipient : Recipient_Handler := null;
Data : Data_Handler := null;
Unknown_Command : Unknown_Command_Handler := null;
Header : Header_Handler := null;
@@ -230,8 +230,8 @@ package Milter_API is
May_Add_Headers : Boolean := False;
May_Change_Or_Delete_Headers : Boolean := False;
May_Replace_Body : Boolean := False;
- May_Add_Recepients : Boolean := False;
- May_Remove_Recepients : Boolean := False;
+ May_Add_Recipients : Boolean := False;
+ May_Remove_Recipients : Boolean := False;
May_Quarantine : Boolean := False);
-- Register must be called exactly once before Main. It registers the
-- callbacks and properties of the milter (calls smfi_register).
@@ -354,13 +354,13 @@ package Milter_API is
procedure Add_Recipient
(Context : SMFICTX_Pointer; -- the opaque context handle
Address : String); -- the new recipient's address
- -- Adds a recepient address to the envelope of the current message (calls
+ -- Adds a recipient address to the envelope of the current message (calls
-- smfi_addrcpt).
procedure Delete_Recipient
(Context : SMFICTX_Pointer; -- the opaque context handle
Address : String); -- the recipient address to be removed
- -- Removes the specified recepient address from the envelope of the current
+ -- Removes the specified recipient address from the envelope of the current
-- message (calls smfi_delrcpt).
procedure Replace_Body