From 7bdec3fd59c3b440025535da6a364a3397cada6b Mon Sep 17 00:00:00 2001
From: John Whitington <john@coherentgraphics.co.uk>
Date: Thu, 19 Jan 2017 13:27:42 +0000
Subject: [PATCH] Restore ability to compile with OCaml 3.11.2

---
 cpdf.ml        | 4 ++--
 cpdfcommand.ml | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/cpdf.ml b/cpdf.ml
index 3bd0eff..eec84d3 100644
--- 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
diff --git a/cpdfcommand.ml b/cpdfcommand.ml
index a9283cc..2604201 100644
--- 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