|
|
|
@ -294,17 +294,17 @@ let opam_diffs diffs =
|
|
|
|
|
let l, r = Opamdiff.commands_to_strings a in
|
|
|
|
|
[
|
|
|
|
|
h5 [ txt "build instruction (without common prefix) modifications, old:" ] ;
|
|
|
|
|
ul (List.map (fun s -> li [ txt s ]) l) ;
|
|
|
|
|
code (List.concat_map (fun s -> [ txt s ; br () ]) l) ;
|
|
|
|
|
h5 [ txt "new" ] ;
|
|
|
|
|
ul (List.map (fun s -> li [ txt s ]) r)
|
|
|
|
|
code (List.concat_map (fun s -> [ txt s ; br () ]) r)
|
|
|
|
|
]) @
|
|
|
|
|
(match pd.Opamdiff.install with None -> [] | Some a ->
|
|
|
|
|
let l, r = Opamdiff.commands_to_strings a in
|
|
|
|
|
[
|
|
|
|
|
h5 [ txt "install instruction (without common prefix) modifications, old:" ] ;
|
|
|
|
|
ul (List.map (fun s -> li [ txt s ]) l) ;
|
|
|
|
|
code (List.concat_map (fun s -> [ txt s ; br () ]) l) ;
|
|
|
|
|
h5 [ txt "new" ] ;
|
|
|
|
|
ul (List.map (fun s -> li [ txt s ]) r)
|
|
|
|
|
code (List.concat_map (fun s -> [ txt s ; br () ]) r)
|
|
|
|
|
]) @
|
|
|
|
|
(match pd.Opamdiff.url with None -> [] | Some a ->
|
|
|
|
|
let l, r = Opamdiff.opt_url_to_string a in
|
|
|
|
|