mirror of
https://github.com/johnwhitington/cpdf-source.git
synced 2025-06-05 22:09:39 +02:00
Make preserve_actions a requirement
This commit is contained in:
@@ -3445,7 +3445,7 @@ let stem s =
|
||||
let fast_write_split_pdfs
|
||||
?(names=[]) enc splitlevel original_filename sq spec main_pdf pagenums pdf_pages
|
||||
=
|
||||
let marks = Pdfmarks.read_bookmarks main_pdf in
|
||||
let marks = Pdfmarks.read_bookmarks ~preserve_actions:false main_pdf in
|
||||
iter2
|
||||
(fun number pagenums ->
|
||||
let pdf = Pdfpage.pdf_of_pages ~retain_numbering:args.retain_numbering ~process_struct_tree:args.process_struct_trees main_pdf pagenums in
|
||||
@@ -3472,7 +3472,7 @@ let bookmark_pages level pdf =
|
||||
l when l.Pdfmarks.level = level ->
|
||||
Some (Pdfpage.pagenumber_of_target ~fastrefnums pdf l.Pdfmarks.target)
|
||||
| _ -> None)
|
||||
(Pdfmarks.read_bookmarks pdf))
|
||||
(Pdfmarks.read_bookmarks ~preserve_actions:false pdf))
|
||||
|
||||
let split_at_bookmarks
|
||||
enc original_filename ~squeeze level spec pdf
|
||||
|
Reference in New Issue
Block a user