+utf8

cpdf.ml

@@ -640,7 +640,7 @@ let mark_of_json pdf = function
             ("open", `Bool openstatus);
             ("target", target)] ->
        {Pdfmarks.level = level;
-        Pdfmarks.text = text;
+        Pdfmarks.text = Pdftext.pdfdocstring_of_utf8 text;
         Pdfmarks.target = target_of_json_target pdf pagenumber target;
         Pdfmarks.isopen = openstatus}
   | _ -> error "malformed mark in mark_of_json"
@@ -886,7 +886,7 @@ let output_json_marks ch calculate_page_number pdf fastrefnums marks =
   let json_of_mark m =
     `Assoc
        [("level", `Int m.Pdfmarks.level);
-        ("text", `String m.Pdfmarks.text);
+        ("text", `String (Pdftext.utf8_of_pdfdocstring m.Pdfmarks.text));
         ("page", `Int (calculate_page_number m));
         ("open", `Bool m.Pdfmarks.isopen);
         ("target", json_of_target pdf fastrefnums m.Pdfmarks.target)]

cpdfmanual.tex

@@ -2,7 +2,7 @@
 %Document -decrypt-force
 %Document -collate
 %Document -impose and friends (inc. 0-w, 0-h for long ones, how lines scale etc., undefined if pages different sizes)
-%Document -bookmarks-json including special "none" target
+%Document -bookmarks-json including mentioning UTF8
 
 \documentclass{book}
 % Edit here to produce cpdfmanual.pdf, cpdflibmanual.pdf, pycpdfmanual.pdf etc.