X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/2aeb9eece3df3aacb6813db7b151256c2e49a1c2..7f012ffdbae5dbee9642fee030647d558b25c8c4:/src/plugins/apache.sml diff --git a/src/plugins/apache.sml b/src/plugins/apache.sml index 7689860..23f8dd3 100644 --- a/src/plugins/apache.sml +++ b/src/plugins/apache.sml @@ -460,4 +460,27 @@ val () = Env.action_none "satisfyAll" val () = Env.action_none "satisfyAny" (fn () => write "\tSatisfy any\n") +val () = Env.action_one "forceType" + ("type", Env.string) + (fn ty => (write "\tForceType "; + write ty; + write "\n")) + +val () = Env.action_none "forceTypeOff" + (fn () => write "\tForceType None\n") + +val () = Env.action_two "action" + ("what", Env.string, "how", Env.string) + (fn (what, how) => (write "\tAction "; + write what; + write " "; + write how; + write "\n")) + +val () = Env.action_one "addDefaultCharset" + ("charset", Env.string) + (fn ty => (write "\tAddDefaultCharset "; + write ty; + write "\n")) + end