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
 | 
			
		||||
  (* Need to deal with "null", "(string)", and "<<other thing like action" *) 
 | 
			
		||||
  | 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
 | 
			
		||||
 | 
			
		||||
let target_of_markfile_target pdf i' = function
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user