fenix
/
cpdf-source
mirror of https://github.com/johnwhitington/cpdf-source.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fixmes

This commit is contained in:
John Whitington 2024-01-16 18:13:32 +00:00
parent 81409cfcaf
commit bb9afb9833
1 changed files with 0 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
cpdfcommand.ml
View File

@ -3311,7 +3311,6 @@ let write_pdf ?(encryption = None) ?(is_decompress=false) mk_id pdf =
really_write_pdf ~encryption ~is_decompress mk_id pdf outname really_write_pdf ~encryption ~is_decompress mk_id pdf outname
end end
| Stdout -> | Stdout ->
(* FIXME Do not use a temp file if not calling cpdflin *)
let temp = Filename.temp_file "cpdfstdout" ".pdf" in let temp = Filename.temp_file "cpdfstdout" ".pdf" in
begin match encryption with begin match encryption with
None -> None ->
@ -3564,9 +3563,6 @@ let go () =
pdfs; pdfs;
begin match pdfs with begin match pdfs with
| [pdf] -> | [pdf] ->
(* FIXME Here, if the output file is different from the
input file, and we're just extracting pages, might we use a
lazy read? *)
if hd ranges <> "all" then if hd ranges <> "all" then
let range = parse_pagespec pdf (hd ranges) in let range = parse_pagespec pdf (hd ranges) in
let newpdf = Pdfpage.pdf_of_pages ~retain_numbering:args.retain_numbering pdf range in let newpdf = Pdfpage.pdf_of_pages ~retain_numbering:args.retain_numbering pdf range in