mirror of
https://github.com/johnwhitington/cpdf-source.git
synced 2025-06-05 22:09:39 +02:00
Make sure plan named destinations round-trip through JSON
This commit is contained in:
@ -45,7 +45,7 @@ let target_of_markfile_obj pdf i' pdfobj =
|
|||||||
end
|
end
|
||||||
(* Need to deal with "null", "(string)", and "<<other thing like action" *)
|
(* Need to deal with "null", "(string)", and "<<other thing like action" *)
|
||||||
| Pdf.Null -> Pdfdest.NullDestination
|
| Pdf.Null -> Pdfdest.NullDestination
|
||||||
| Pdf.String s -> Pdfdest.read_destination pdf (Pdf.String s)
|
| Pdf.String s -> Pdfdest.NamedDestinationElsewhere s (* TODO Remove hack. *)
|
||||||
| x -> Pdfdest.Action x
|
| x -> Pdfdest.Action x
|
||||||
|
|
||||||
let target_of_markfile_target pdf i' = function
|
let target_of_markfile_target pdf i' = function
|
||||||
|
Reference in New Issue
Block a user