X-Git-Url: http://git.hcoop.net/hcoop/portal.git/blobdiff_plain/f3f3ad24b001552bdb1b7535fc8434d6889ef2bc..b7b8862b65e3a2be9daaef4f2850d9ebafebe4c3:/app.sig diff --git a/app.sig b/app.sig index e169a44..14fa153 100644 --- a/app.sig +++ b/app.sig @@ -6,6 +6,7 @@ sig | ACCEPTED | REJECTED | ADDED + | BEING_ADDED val readTosBody : unit -> string val readTosAgree : unit -> string @@ -16,10 +17,11 @@ sig passwd : string, status : status, applied : Init.C.timestamp, ipaddr : string option, confirmed : Init.C.timestamp option, decided : Init.C.timestamp option, - msg : string } + msg : string, unix_passwd : string, + 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 @@ -27,6 +29,11 @@ sig val deny : int * string -> bool val approve : int * string -> bool + val preAdd : int -> unit val add : int -> unit val abortAdd : int -> unit -end \ No newline at end of file + val welcome : int -> unit + + val searchPaypal : string -> app list + val searchCheckout : string -> app list +end