Rombobjörn

summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBjörn Persson <bjorn@rombobjörn.se>2013-08-07 17:57:37 +0200
committerBjörn Persson <bjorn@rombobjörn.se>2013-08-07 17:57:37 +0200
commited061ef007de3c94fdbb38ce1b0a9fd8225a04a2 (patch)
tree29346912f1a908d823cef5d86422563930559821
parenta87549bfa1153fc92189d6c95b3a19813b22a680 (diff)
minor formatting adjustmentversion_2.1.1.2
-rw-r--r--milter_api.adb58
1 files changed, 29 insertions, 29 deletions
diff --git a/milter_api.adb b/milter_api.adb
index ab0793b..1298aab 100644
--- a/milter_api.adb
+++ b/milter_api.adb
@@ -68,35 +68,35 @@ package body Milter_API is
-- Option flags:
- SMFIF_ADDHDRS : constant := 16#1#; -- add headers
- SMFIF_CHGBODY : constant := 16#2#; -- replace body
- SMFIF_ADDRCPT : constant := 16#4#; -- add envelope recipients
- SMFIF_DELRCPT : constant := 16#8#; -- delete envelope recipients
- SMFIF_CHGHDRS : constant := 16#10#; -- change/delete headers
- SMFIF_QUARANTINE : constant := 16#20#; -- quarantine envelope
- SMFIF_CHGFROM : constant := 16#40#; -- change envelope sender
- SMFIF_ADDRCPT_PAR : constant := 16#80#; -- add recipients with args
- SMFIF_SETSYMLIST : constant := 16#100#; -- request set of symbols
- SMFIP_NOCONNECT : constant := 16#1#; -- don't send connect info
- SMFIP_NOHELO : constant := 16#2#; -- don't send HELO info
- SMFIP_NOMAIL : constant := 16#4#; -- don't send MAIL info
- SMFIP_NORCPT : constant := 16#8#; -- don't send RCPT info
- SMFIP_NOBODY : constant := 16#10#; -- don't send body
- SMFIP_NOHDRS : constant := 16#20#; -- don't send headers
- SMFIP_NOEOH : constant := 16#40#; -- don't send EOH
- SMFIP_NR_HDR : constant := 16#80#; -- No reply for headers
- SMFIP_NOUNKNOWN : constant := 16#100#; -- don't send unknown commands
- SMFIP_NODATA : constant := 16#200#; -- don't send DATA
- SMFIP_SKIP : constant := 16#400#; -- MTA understands SMFIS_SKIP
- SMFIP_RCPT_REJ : constant := 16#800#; -- also send rejected RCPTs
- SMFIP_NR_CONN : constant := 16#1000#; -- No reply for connect
- SMFIP_NR_HELO : constant := 16#2000#; -- No reply for HELO
- SMFIP_NR_MAIL : constant := 16#4000#; -- No reply for MAIL
- SMFIP_NR_RCPT : constant := 16#8000#; -- No reply for RCPT
- SMFIP_NR_DATA : constant := 16#10000#; -- No reply for DATA
- SMFIP_NR_UNKN : constant := 16#20000#; -- No reply for UNKN
- SMFIP_NR_EOH : constant := 16#40000#; -- No reply for eoh
- SMFIP_NR_BODY : constant := 16#80000#; -- No reply for body chunk
+ SMFIF_ADDHDRS : constant := 16#1#; -- add headers
+ SMFIF_CHGBODY : constant := 16#2#; -- replace body
+ SMFIF_ADDRCPT : constant := 16#4#; -- add envelope recipients
+ SMFIF_DELRCPT : constant := 16#8#; -- delete envelope recipients
+ SMFIF_CHGHDRS : constant := 16#10#; -- change/delete headers
+ SMFIF_QUARANTINE : constant := 16#20#; -- quarantine envelope
+ SMFIF_CHGFROM : constant := 16#40#; -- change envelope sender
+ SMFIF_ADDRCPT_PAR : constant := 16#80#; -- add recipients with args
+ SMFIF_SETSYMLIST : constant := 16#100#; -- request set of symbols
+ SMFIP_NOCONNECT : constant := 16#1#; -- don't send connect info
+ SMFIP_NOHELO : constant := 16#2#; -- don't send HELO info
+ SMFIP_NOMAIL : constant := 16#4#; -- don't send MAIL info
+ SMFIP_NORCPT : constant := 16#8#; -- don't send RCPT info
+ SMFIP_NOBODY : constant := 16#10#; -- don't send body
+ SMFIP_NOHDRS : constant := 16#20#; -- don't send headers
+ SMFIP_NOEOH : constant := 16#40#; -- don't send EOH
+ SMFIP_NR_HDR : constant := 16#80#; -- No reply for headers
+ SMFIP_NOUNKNOWN : constant := 16#100#; -- don't send unknown commands
+ SMFIP_NODATA : constant := 16#200#; -- don't send DATA
+ SMFIP_SKIP : constant := 16#400#; -- MTA understands SMFIS_SKIP
+ SMFIP_RCPT_REJ : constant := 16#800#; -- also send rejected RCPTs
+ SMFIP_NR_CONN : constant := 16#1000#; -- No reply for connect
+ SMFIP_NR_HELO : constant := 16#2000#; -- No reply for HELO
+ SMFIP_NR_MAIL : constant := 16#4000#; -- No reply for MAIL
+ SMFIP_NR_RCPT : constant := 16#8000#; -- No reply for RCPT
+ SMFIP_NR_DATA : constant := 16#10000#; -- No reply for DATA
+ SMFIP_NR_UNKN : constant := 16#20000#; -- No reply for UNKN
+ SMFIP_NR_EOH : constant := 16#40000#; -- No reply for eoh
+ SMFIP_NR_BODY : constant := 16#80000#; -- No reply for body chunk
SMFIP_HDR_LEADSPC : constant := 16#100000#; -- header value leading space