From cac00a5f14267f15ad935fe384843b0147f11a9a Mon Sep 17 00:00:00 2001 From: Michael Schwarz Date: Tue, 14 Jan 2025 17:52:41 +0100 Subject: [PATCH] Fix duplicate lines --- src/ocamlutil/pretty.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/ocamlutil/pretty.ml b/src/ocamlutil/pretty.ml index 34fbda42f..4999a4e94 100644 --- a/src/ocamlutil/pretty.ml +++ b/src/ocamlutil/pretty.ml @@ -91,7 +91,7 @@ let breakString init s = if !r = Nil then text else - Concat(text, Concat(Line, !r)) + Concat(text, !r) let nil = Nil