Restore ability to compile with OCaml 3.11.2

2017-01-19 13:27:42 +00:00 · 2017-01-19 13:27:42 +00:00 · 7bdec3fd59
parent 7d11cbcce7
commit 7bdec3fd59
2 changed files with 3 additions and 3 deletions
--- a/cpdf.ml
+++ b/cpdf.ml
@ -841,7 +841,7 @@ let list_attached_files pdf =
                                   | Some stream ->
                                       Some
                                        {name = s;
-                                         pagenumber;
+                                         pagenumber = pagenumber;
                                         data =
                                           (fun () ->
                                             try
@ -857,7 +857,7 @@ let list_attached_files pdf =
                              | _ ->
                                  Some
                                    {name = s;
-                                     pagenumber;
+                                     pagenumber = pagenumber;
                                     data = (fun () -> raise (Pdf.PDFError "no attachment data"))}
                              end
                          | _ -> None
--- a/cpdfcommand.ml
+++ b/cpdfcommand.ml
@ -1,5 +1,5 @@
 (* cpdf command line tools *)
-let demo = true
+let demo = false
 let noncomp = false
 let major_version = 2
 let minor_version = 2