robur/builder-web
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

as suggested by @reynir, use a pre

Browse source
This commit is contained in:
Hannes Mehnert 2025-01-08 17:00:00 +01:00
parent 0a025adaae
commit e26af2dfdf
1 changed files with 2 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lib/views.ml
View file

@ -827,13 +827,10 @@ let duniverse_diffs diffs =
let opam_diffs diffs = let opam_diffs diffs =
List.concat_map (fun pd -> List.concat_map (fun pd ->
let diff =
List.concat_map (fun line -> [ H.txt line ; H.br () ])
(String.split_on_char '\n' pd.Opamdiff.diff)
in
H.h4 [ txtf "%a" Opamdiff.pp_opam_diff pd ] :: H.h4 [ txtf "%a" Opamdiff.pp_opam_diff pd ] ::
H.h5 [ H.txt "diff" ] :: H.h5 [ H.txt "diff" ] ::
H.code diff :: []) H.pre [ H.code [ H.txt pd.diff ] ] ::
H.br () :: [])
diffs diffs
let compare_builds let compare_builds