setsa

[hcoop/domtool2.git] / src / msgTypes.sml

diff --git a/src/msgTypes.sml b/src/msgTypes.sml
index 3d5997d..7f328e3 100644 (file)
--- a/src/msgTypes.sml
+++ b/src/msgTypes.sml
@@ -69,5 +69,11 @@ datatype msg =
        (* List all mailboxes for a domain *)
        | MsgMailboxes of {user : string, mailbox : string} list
        (* Reply to MsgListMailboxes *)
        (* List all mailboxes for a domain *)
        | MsgMailboxes of {user : string, mailbox : string} list
        (* Reply to MsgListMailboxes *)

+       | MsgSaQuery of string
+       (* Check on the SpamAsssassin filtering status of a user or e-mail address *)
+       | MsgSaStatus of bool
+       (* Response to MsgSaQuery *)
+       | MsgSaSet of string * bool
+       (* Set the filtering status of a user or e-mail address *)

 
 end
 
 end