First vmail support

[hcoop/domtool2.git] / src / main.sig

diff --git a/src/main.sig b/src/main.sig
index 7e2746a..e9a8d2d 100644 (file)
--- a/src/main.sig
+++ b/src/main.sig
@@ -48,7 +48,12 @@ signature MAIN = sig
     val listBasis : unit -> string list
     val autodocBasis : string -> unit
 
-    val requestDbUser : string -> unit
+    val requestDbUser : {dbtype : string, passwd : string option} -> unit
     val requestDbTable : {dbtype : string, dbname : string} -> unit
 
+    val requestNewMailbox : {domain : string, user : string,
+                            passwd : string, mailbox : string} -> unit
+    val requestPasswdMailbox : {domain : string, user : string, passwd : string}
+                              -> unit
+    val requestRmMailbox : {domain : string, user : string} -> unit
 end