Removed debug print

This commit is contained in:
John Whitington 2014-09-19 13:59:33 +01:00
parent 3b9b91e5f3
commit 2fd9c2ec0f
1 changed files with 0 additions and 3 deletions

View File

@ -2750,7 +2750,6 @@ let go () =
flprint flprint
("cpdf Version " ^ string_of_int major_version ^ "." ^ string_of_int minor_version ^ " " ^ version_date ^ "\n") ("cpdf Version " ^ string_of_int major_version ^ "." ^ string_of_int minor_version ^ " " ^ version_date ^ "\n")
| None | Some Merge -> | None | Some Merge ->
(* 14th Sept 2010 - changed to write_pdf false pdf because we're not supposed to change it.*)
begin match args.out, args.inputs with begin match args.out, args.inputs with
| _, (_::_ as inputs) -> | _, (_::_ as inputs) ->
let write_pdf x pdf = let write_pdf x pdf =
@ -2781,8 +2780,6 @@ let go () =
(* FIXME Here, if the output file is different from the (* FIXME Here, if the output file is different from the
input file, and we're just extracting pages, might we use a input file, and we're just extracting pages, might we use a
lazy read? *) lazy read? *)
(*Pdfwrite.debug_whole_pdf pdf;*)
flprint "Just one file, we'll use Pdfpage.pdf_of_pages...\n";
if hd ranges <> "all" || hd rotations <> Pdfmerge.DNR || !Pdfpage.flat_pagetrees then if hd ranges <> "all" || hd rotations <> Pdfmerge.DNR || !Pdfpage.flat_pagetrees then
let pdf = if hd rotations <> Pdfmerge.DNR then prerotate_pdf pdf (hd rotations) else pdf in let pdf = if hd rotations <> Pdfmerge.DNR then prerotate_pdf pdf (hd rotations) else pdf in
let range = parse_pagespec pdf (hd ranges) in let range = parse_pagespec pdf (hd ranges) in