\ d : (your_domain) ->
\\ config : Domain ->
domain d with
- dns (dnsNS "deleuze.hcoop.net");
- dns (dnsNS "mire.hcoop.net");
+ dns (dnsNS "ns1.hcoop.net");
+ dns (dnsNS "ns3.hcoop.net");
dns (dnsDefaultA (ip_of_node default_node));
{{See <a href="http://httpd.apache.org/docs/2.0/mod/mod_rewrite.html#rewriterule">Apache
documentation for <tt>RewriteRule</tt></a>.}}
-extern val rewriteCond: no_spaces -> no_spaces -> [mod_rewrite_cond_flag] -> [^Vhost];
+extern val rewriteCond : no_spaces -> no_spaces -> [mod_rewrite_cond_flag] -> [^Vhost];
{{See <a href="http://httpd.apache.org/docs/2.0/mod/mod_rewrite.html#rewritecond">Apache
documentation for <tt>RewriteCond</tt></a>.}}
+extern val rewriteBase : no_spaces -> [^Vhost];
+{{See <a href="http://httpd.apache.org/docs/2.0/mod/mod_rewrite.html#rewritebase">Apache
+ documentation for <tt>RewriteBase</tt></a>.}}
+
extern type proxy_port;
{{A port number above 1024}}
write "]");
write "\n"))
+val () = Env.action_one "rewriteBase"
+ ("prefix", Env.string)
+ (fn prefix =>
+ (checkRewrite ();
+ write "\tRewriteBase\t";
+ write prefix;
+ write "\n"))
+
val () = Env.action_one "rewriteLogLevel"
("level", Env.int)
(fn level =>