Mailing list creation requests
[hcoop/portal.git] / util.sig
index 55b05c3..3bfaccc 100644 (file)
--- a/util.sig
+++ b/util.sig
@@ -1,5 +1,7 @@
 signature UTIL =
 sig
+    val init : unit -> unit
+
     datatype 'a flat_element =
             BEGIN
           | END
@@ -15,5 +17,8 @@ sig
 
     val validHost : string -> bool
     val validDomain : string -> bool
+    val validEmail : string -> bool
     val whoisUrl : string -> string
+
+    val randomPassword : unit -> string
 end
\ No newline at end of file