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

Cleaned printfs

This commit is contained in:
John Whitington 2014-09-25 13:30:21 +01:00
parent 309c8bc85a
commit 2aab644fea
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
cpdfcommand.ml
View File

@ -448,8 +448,6 @@ let operation_allowed banlist = function
| Some op -> flprint "checking...\n"; not (banned banlist op) | Some op -> flprint "checking...\n"; not (banned banlist op)
let rec decrypt_if_necessary (a, b, c, user_pw, owner_pw) op pdf = let rec decrypt_if_necessary (a, b, c, user_pw, owner_pw) op pdf =
Printf.printf "decrypt_if_necessary: args.op is %s\n"
(match args.op with None -> "None" | Some _ -> "Some");
if not (Pdfcrypt.is_encrypted pdf) then pdf else if not (Pdfcrypt.is_encrypted pdf) then pdf else
match Pdfcrypt.decrypt_pdf_owner owner_pw pdf with match Pdfcrypt.decrypt_pdf_owner owner_pw pdf with
| Some pdf -> pdf | Some pdf -> pdf