From 5d421f51474efb8d4b5dc120b744bc5b27fa1f16 Mon Sep 17 00:00:00 2001
From: John Whitington <john@coherentgraphics.co.uk>
Date: Wed, 2 Dec 2020 17:20:43 +0000
Subject: [PATCH] more

---
 cpdfstrftime.ml | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/cpdfstrftime.ml b/cpdfstrftime.ml
index 26cff27..f0826fd 100644
--- a/cpdfstrftime.ml
+++ b/cpdfstrftime.ml
@@ -159,10 +159,10 @@ let return_date () =
          _tm_min = get_int r 39 2;
          _tm_hour = get_int r 37 2;
          _tm_mday = day;
-         _tm_mon = month;
-         _tm_year = year;
+         _tm_mon = month - 1;
+         _tm_year = year - 1900;
          _tm_wday = get_int r2 13 1;
-         _tm_yday = year_day day month year;
+         _tm_yday = year_day day month year - 1;
          _tm_isdst = false}
   | _ -> failwith "Unknown Sys.os_type in Cpdfstrftime.return_date"