Prevent new missing mediabox warning triggering in -image-resolution
This commit is contained in:
parent
d065fcede3
commit
31588000f8
2
cpdf.ml
2
cpdf.ml
|
@ -4422,7 +4422,7 @@ let rec image_resolution_page pdf page pagenum dpi (images : (int * string * xob
|
||||||
in
|
in
|
||||||
let page =
|
let page =
|
||||||
{Pdfpage.content = [content];
|
{Pdfpage.content = [content];
|
||||||
Pdfpage.mediabox = Pdf.Null;
|
Pdfpage.mediabox = Pdfpage.rectangle_of_paper Pdfpaper.a4;
|
||||||
Pdfpage.resources = resources;
|
Pdfpage.resources = resources;
|
||||||
Pdfpage.rotate = Pdfpage.Rotate0;
|
Pdfpage.rotate = Pdfpage.Rotate0;
|
||||||
Pdfpage.rest = Pdf.Dictionary []}
|
Pdfpage.rest = Pdf.Dictionary []}
|
||||||
|
|
Loading…
Reference in New Issue