Tidying up
This commit is contained in:
parent
6f345c4b80
commit
f7afbb614f
1
Changes
1
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:
|
||||
|
|
|
@ -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 []
|
||||
|
||||
|
|
Loading…
Reference in New Issue