[OCaml] Mobile-friendly clone of cgit.
1
(** Plain text documentation format.
2
3
Each non-blank line becomes a paragraph. No inline markup is applied. *)
4
5
let format : Format.format =
6
{
7
name = "plaintext";
8
css_class = "readme-document readme-plaintext";
9
parse =
10
(fun content ->
11
let lines = String.split_on_char '\n' content in
12
let blocks =
13
List.filter_map
14
(fun line ->
15
let trimmed = String.trim line in
16
if trimmed = "" then None else Some (Format.Paragraph trimmed))
17
lines
18
in
19
{ Format.title = None; metadata = []; blocks });
20
inline = (fun text -> [ Ui.text text ]);
21
}
22