Bit awkward having the proxied server in between the match and rewrite
expressions.
extern type proxy_port;
{{A port number above 1024}}
extern type proxy_port;
{{A port number above 1024}}
-extern val proxyRewrite : regexp -> proxy_reverse_target -> no_spaces -> [mod_rewrite_flag] -> [^Vhost];
+extern val proxyRewrite : regexp -> no_spaces -> proxy_reverse_target -> [mod_rewrite_flag] -> [^Vhost];
+
{{Safe wrapper around mod_rewrite proxy flag. All requests matching
the regular expression in the first argument are proxied to the host
{{Safe wrapper around mod_rewrite proxy flag. All requests matching
the regular expression in the first argument are proxied to the host
- specified in the second argument, appending a new URI by
- substituting variables in the third argument as per Apache
+ specified in the third argument, appending a new URI by substituting
+ variables in the second argument as per Apache
mod_rewrite. Additional rewrite flags may be specified.}}
extern type mod_rewrite_trace_level;
mod_rewrite. Additional rewrite flags may be specified.}}
extern type mod_rewrite_trace_level;
expiresEnabled := true)
val () = Env.action_four "proxyRewrite"
expiresEnabled := true)
val () = Env.action_four "proxyRewrite"
- ("from", Env.string, "tohost", Env.string, "to", Env.string, "flags", Env.list flag)
- (fn (from, tohost, to, flags) =>
+ ("from", Env.string, "to", Env.string, "tohost", Env.string, "flags", Env.list flag)
+ (fn (from, to, tohost, flags) =>
(checkRewrite ();
write "\tRewriteRule\t\"";
write from;
(checkRewrite ();
write "\tRewriteRule\t\"";
write from;