From b069bf66e3ac4e482996b5cc120ec6c7eb6d830a Mon Sep 17 00:00:00 2001 From: Charlotte Thomas Date: Sun, 20 Mar 2022 20:41:05 +0100 Subject: [PATCH] add a blank --- lib/parser.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/parser.ml b/lib/parser.ml index c46d788..7f8bad6 100644 --- a/lib/parser.ml +++ b/lib/parser.ml @@ -65,7 +65,7 @@ let parse_to_html ?(min_chap=1) ast= (match l with | [] -> "" | Line s::_ -> - let name,_ = recognize_gls s in Printf.sprintf "%s" s name + let name,_ = recognize_gls s in Printf.sprintf "%s " s name | _::_ -> "") | "textit" -> (Printf.sprintf "%s" str) | "textbf" -> (Printf.sprintf "%s" str)