let htmlbinding_cp_wrapper =
let w = Config_file.tuple3_wrappers
key_cp_wrapper
Config_file.string_wrappers
Config_file.string_wrappers
in
{
to_raw = (fun v -> w.to_raw (v.html_key, v.html_begin, v.html_end)) ;
of_raw =
(fun r -> let (k,b,e) = w.of_raw r in
{ html_key = k ; html_begin = b ; html_end = e }
) ;
}