[html debug] Do not escape non-ascii chars

Reviewed By: skcho

Differential Revision: D13187822

fbshipit-source-id: 2b2e3d248
master
Mehdi Bouaziz 6 years ago committed by Facebook Github Bot
parent 442fecc030
commit 3b9bccf126

@ -42,7 +42,6 @@ let escape_csv s =
let escape_xml s = let escape_xml s =
let map = function let map = function
| '"' -> | '"' ->
(* on next line to avoid bad indentation *)
Some """ Some """
| '>' -> | '>' ->
Some ">" Some ">"
@ -52,9 +51,6 @@ let escape_xml s =
Some "&" Some "&"
| '%' -> | '%' ->
Some "%" Some "%"
| c when Char.to_int c > 127 ->
(* non-ascii character: escape *)
Some ("&#" ^ string_of_int (Char.to_int c) ^ ";")
| _ -> | _ ->
None None
in in

Loading…
Cancel
Save