diff --git a/cpdfjson.ml b/cpdfjson.ml index 8ad4b33..93f61a2 100644 --- a/cpdfjson.ml +++ b/cpdfjson.ml @@ -400,7 +400,7 @@ let json_of_pdf (fun i pdfobj -> ps := (i, json_of_object pdf fcs no_stream_data parse_content pdfobj)::!ps) pdf; - parameters::trailerdict::!ps + parameters::trailerdict::sort compare !ps in let pairs_parsed = if not parse_content then pairs else