diff --git a/Changes b/Changes index 69c75e2..fedfa19 100644 --- a/Changes +++ b/Changes @@ -23,7 +23,6 @@ o Preserve /GoTo actions in bookmarks when merging o UTF8 option for JSON output o -info now shows object stream, /ID data, page mode and layout o More options for viewer preference control -o Export some PNGs directly, rather than via an external program o More default colours, by using the CSS colour list Fixes: diff --git a/cpdfannot.ml b/cpdfannot.ml index 91ffbee..bef91a0 100644 --- a/cpdfannot.ml +++ b/cpdfannot.ml @@ -55,14 +55,11 @@ let rewrite_destinations f pdf annot = end | None -> annot -(* We exclude the same annotations as the XFDF spec does *) +(* We exclude the same annotations as the XFDF spec does. *) let excluded pdf annot = match Pdf.lookup_direct pdf "/Subtype" annot with | Some (Pdf.Name ("/Movie" | "/Widget" | "/Screen" | "/PrinterMark" | "/TrapNet")) -> true | _ -> false -(* Printf.printf "Skipping %s\n" n; true - | Some (Pdf.Name x) -> - Printf.printf "Including %s\n" x; false*) let extra = ref []