More -process-images-info work
This commit is contained in:
parent
70e9092e01
commit
96a9142542
|
@ -566,6 +566,7 @@ let lossless_out pdf ~pixel_threshold ~length_threshold extension s dict referen
|
||||||
in
|
in
|
||||||
print_string (Pdfwrite.string_of_pdf dict);
|
print_string (Pdfwrite.string_of_pdf dict);
|
||||||
print_string (Printf.sprintf "%s (%s) [%s]\n" colspace bpc filter);*)
|
print_string (Printf.sprintf "%s (%s) [%s]\n" colspace bpc filter);*)
|
||||||
|
if !debug_image_processing then Printf.printf "not suitable\n%!";
|
||||||
None (* an image we cannot or do not handle *)
|
None (* an image we cannot or do not handle *)
|
||||||
|
|
||||||
let lossless_to_jpeg pdf ~pixel_threshold ~length_threshold ~percentage_threshold ~qlossless ~path_to_convert s dict reference =
|
let lossless_to_jpeg pdf ~pixel_threshold ~length_threshold ~percentage_threshold ~qlossless ~path_to_convert s dict reference =
|
||||||
|
|
Loading…
Reference in New Issue