Fixing problems various in membership application and addition

[bpt/portal.git] / app.sig

diff --git a/app.sig b/app.sig
index f31c5be..14fa153 100644 (file)
--- a/app.sig
+++ b/app.sig
@@ -6,6 +6,7 @@ sig
           | ACCEPTED
           | REJECTED
           | ADDED
+          | BEING_ADDED
 
     val readTosBody : unit -> string
     val readTosAgree : unit -> string
@@ -20,7 +21,7 @@ sig
                 paypal : string option, checkout : string option }
 
     val lookupApp : int -> app
-    val listApps : status -> app list
+    val listApps : status list -> app list
 
     val votes : int -> (int * string) list
     val vote : int * int -> unit
@@ -28,6 +29,7 @@ sig
 
     val deny : int * string -> bool
     val approve : int * string -> bool
+    val preAdd : int -> unit
     val add : int -> unit
     val abortAdd : int -> unit
     val welcome : int -> unit