backlashes can be used to create invalid config (e.g. using one at the
end of the line), and don't seem to be particularly useful
here. Disallow entirely for now.
val _ = Env.type_one "rewrite_arg"
Env.string
- (CharVector.all (fn ch => (Char.isGraph ch) andalso not (List.exists (fn c => ch = c) [ #"[", #"]", #",", #"\"", #"'", #"=", #":" ])))
+ (CharVector.all (fn ch => (Char.isGraph ch) andalso not (List.exists (fn c => ch = c) [ #"[", #"]", #",", #"\"", #"'", #"=", #":", "\\" ])))
val _ = Env.type_one "suexec_flag"
Env.bool