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

Final annotation matterhorns

This commit is contained in:
John Whitington 2024-06-21 14:26:08 +01:00
parent fb526d256c
commit ba139b44e7
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
cpdfua.ml
View File

@ -719,7 +719,12 @@ let matterhorn_28_016 _ _ pdf =
covered_elsewhere ()
(* A PrinterMark annotation is included in the logical structure. *)
let matterhorn_28_017 _ _ pdf = todo ()
let matterhorn_28_017 _ _ pdf =
Pdf.objiter
(fun _ o -> match Pdf.lookup_direct pdf "/Subtype" o, Pdf.lookup_direct pdf "/StructParent" o with
| Some (Pdf.Name "/PrinterMark"), Some _ -> merror ()
| _ -> ())
pdf
(* The appearance stream of a PrinterMark annotation is not marked as Artifact.
*)