E-mail aliases

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

diff --git a/src/domain.sig b/src/domain.sig
index eb94f3f..8c79274 100644 (file)
--- a/src/domain.sig
+++ b/src/domain.sig
@@ -20,6 +20,10 @@
 
 signature DOMAIN = sig
 
 
 signature DOMAIN = sig
 

+    val isIdent : char -> bool
+    val validHost : string -> bool
+    val validDomain : string -> bool
+

     val registerBefore : (string -> unit) -> unit
     val registerAfter : (string -> unit) -> unit
     (* Register handlers to run just before and after entering a domain
     val registerBefore : (string -> unit) -> unit
     val registerAfter : (string -> unit) -> unit
     (* Register handlers to run just before and after entering a domain