forked from
jonmsterling.com/ocaml-forester
ocaml
strip html xmlns in html renderer to work around issue kento pointed out
Still not sure why this isn't working, but that's for another day.
+3
-1
+3
-1
lib/frontend/Html_client.ml
+3
-1
lib/frontend/Html_client.ml
···
37
37
let render_xml_qname qname =
38
38
match qname.prefix with
39
39
| "" -> qname.uname
40
-
| _ -> Format.sprintf "%s:%s" qname.prefix qname.uname
40
+
| _ ->
41
+
if qname.xmlns = Some "http://www.w3.org/1999/xhtml" then qname.uname
42
+
else Format.sprintf "%s:%s" qname.prefix qname.uname
41
43
42
44
let render_xml_attr ~env T.{key; value} =
43
45
let str_value =