mirror of
https://github.com/johnwhitington/cpdf-source.git
synced 2025-06-05 22:09:39 +02:00
more
This commit is contained in:
@@ -2335,7 +2335,7 @@ let write_pdf ?(encryption = None) ?(is_decompress=false) mk_id pdf =
|
|||||||
assert false
|
assert false
|
||||||
with
|
with
|
||||||
End_of_file ->
|
End_of_file ->
|
||||||
begin try close_out temp_file; Sys.remove temp with
|
begin try close_in temp_file; Sys.remove temp with
|
||||||
e -> Printf.eprintf "Failed to remove temp file %s (%s)\n" temp (Printexc.to_string e)
|
e -> Printf.eprintf "Failed to remove temp file %s (%s)\n" temp (Printexc.to_string e)
|
||||||
end;
|
end;
|
||||||
flush stdout (*r For Windows *)
|
flush stdout (*r For Windows *)
|
||||||
|
Reference in New Issue
Block a user