setsa

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

diff --git a/src/msgTypes.sml b/src/msgTypes.sml
index cc792ff..7f328e3 100644 (file)
--- a/src/msgTypes.sml
+++ b/src/msgTypes.sml
@@ -67,7 +67,13 @@ datatype msg =
        (* Remove a vmail mapping *)
        | MsgListMailboxes of string
        (* List all mailboxes for a domain *)
-       | MsgMailboxes of string list
+       | 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