fixup! Clock: Change implementation of Date to use Ptime.t

Author: psafont

ocaml/libs/clock/date.ml

@@ -10,6 +10,8 @@
    GNU Lesser General Public License for more details.
 *)
 
+module L = Debug.Make (struct let name = __MODULE__ end)
+
 let months =
   [|
      "Jan"
@@ -109,8 +111,7 @@ let to_rfc822 {t; tz} =
 
 let to_ptime = function
   | {t; tz= None} as d ->
-      Printf.printf
-        "%s: Date %s converted to POSIX time, but timezone is missing"
+      L.warn "%s: Date %s converted to POSIX time, but timezone is missing"
         __FUNCTION__ (to_rfc3339 d) ;
       t
   | {t; tz= Some _} ->

ocaml/libs/clock/dune

@@ -8,6 +8,7 @@
     mtime.clock.os
     (re_export ptime)
     ptime.clock.os
+    xapi-log
   )
 )