jon.recoil.org
this repo has no description
Svg gets special treatment
+1
mime_printer.ml
+1
mime_printer.ml
···
14
14
15
15
let to_odoc x =
16
16
match String.split_on_char '/' x.mime_type, x.encoding with
17
+
| ["image"; "svg"], Noencoding -> Printf.sprintf "{%%html: %s %%}" x.data
17
18
| "image"::_, Base64 -> Printf.sprintf "{%%html: <img src=\"data:%s;base64,%s\" /> %%}" x.mime_type x.data
18
19
| "text"::"odoc"::[], Noencoding -> x.data
19
20
| _ -> ""