From dd464707bae7159be57820cf8d575d8aed987859 Mon Sep 17 00:00:00 2001 From: John Whitington Date: Fri, 17 Oct 2014 13:22:06 +0100 Subject: [PATCH] Adding debug info for encryption --- cpdfcommand.ml | 1 + 1 file changed, 1 insertion(+) diff --git a/cpdfcommand.ml b/cpdfcommand.ml index ff58c36..c55df0e 100644 --- a/cpdfcommand.ml +++ b/cpdfcommand.ml @@ -547,6 +547,7 @@ let rec decrypt_if_necessary (_, _, _, user_pw, owner_pw) op pdf = match Pdfcrypt.decrypt_pdf_owner owner_pw pdf with | Some pdf -> pdf | _ -> + Printf.printf "Couldn't decrypt with owner password %s\n" owner_pw; match Pdfcrypt.decrypt_pdf user_pw pdf with | Some pdf, permissions -> if operation_allowed permissions op