(* 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