Allow ~ in Apache locations
[hcoop/zz_old/domtool2-proto.git] / src / plugins / apache.sml
index 11b4ab3..300ffa4 100644 (file)
@@ -96,7 +96,8 @@ fun validLocation s =
                                                           orelse ch = #"-"
                                                           orelse ch = #"_"
                                                           orelse ch = #"."
-                                                          orelse ch = #"/") s
+                                                          orelse ch = #"/"
+                                                          orelse ch = #"~") s
 
 val _ = Env.type_one "location"
        Env.string