Fix margin calculation in presence of crop box

This commit is contained in:
John Whitington 2025-03-07 19:51:49 +00:00
parent efbb6007e3
commit ce0ce77737

View File

@ -233,7 +233,7 @@ let typeset_table_of_contents ~font ~fontsize ~title ~bookmark ~dotleader ~proce
@
optional [Cpdftype.EndTag] @ [glue]
in
let lm, rm, tm, bm =
let lm, rm, bm, tm =
match firstpage_cropbox with
| None -> (margin, margin, margin, margin)
| Some (cminx, cminy, cmaxx, cmaxy) ->