Fixing problems various in membership application and addition
[bpt/portal.git] / app / app.sig
index 7b17423..2b7de99 100644 (file)
@@ -10,13 +10,14 @@ sig
     val readTosMinorAgree : unit -> string
 
     type application = { name : string, rname : string, gname : string option, email : string,
-                        forward : bool, uses : string, other : string }
+                        forward : bool, uses : string, other : string,
+                        paypal : string option, checkout : string option }
 
-    val apply : application -> bool
+    val apply : application -> string option
 
     val validEmail : string -> bool
-    val validUser : string -> bool
+    val validUsername : string -> bool
     val userExists : string -> bool
 
-    val confirm : int * string -> string option
+    val confirm : int * string -> bool
 end