Annots behaviour

This commit is contained in:
John Whitington 2024-11-26 17:32:16 +00:00
parent c9a7d6d6f3
commit 273aeb8ea7
1 changed files with 1 additions and 0 deletions

View File

@ -3725,6 +3725,7 @@ let rasterize antialias device res annots pdf range =
(Pdfpage.pages_of_pagetree pdf) (Pdfpage.pages_of_pagetree pdf)
(ilist 1 (Pdfpage.endpage pdf))) (ilist 1 (Pdfpage.endpage pdf)))
in in
let pdf = if annots then Cpdfannot.remove_annotations range pdf else pdf in
Sys.remove tmppdf; Sys.remove tmppdf;
pdf pdf