Regularize exit codes for PDF exploration commands

This commit is contained in:
John Whitington
2024-12-31 14:59:10 +00:00
parent d50a94eb1a
commit 0d7f0d593d
4 changed files with 9 additions and 6 deletions

View File

@@ -263,7 +263,6 @@ let replace_dict_entry pdf key value search =
Pdf.objselfmap (dict_entry_single_object f pdf) pdf;
pdf.Pdf.trailerdict <- dict_entry_single_object f pdf pdf.Pdf.trailerdict
(* FIXME no need to self map here, since nothing changes *)
let print_dict_entry ~utf8 pdf key =
let f d =
match Pdf.lookup_direct pdf key d with