Commits

camlspotter committed a676a3c

dates

Comments (0)

Files changed (1)

   type t = Hg(:"hg":) | Git(:"git":) with conv(json), sexp
 end
 
+module LocalTime = struct
+  type t = string with conv(json), sexp
+end
+
+module UTCTime = struct
+  type t = string with conv(json), sexp
+end
+
 (** repositories Endpoint *)
 module Repositories = struct
 
     type t = {
       scm               : Scheme.t;
       has_wiki          : bool;
-      last_updated      : string;
-      created_on        : string;
+      last_updated      : LocalTime.t;
+      utc_last_updated  : UTCTime.t;
+      created_on        : LocalTime.t;
+      utc_created_on    : UTCTime.t;
       owner             : string;
       logo              : string;
       email_mailinglist : string option;
       read_only         : bool;
       followers_count   : int;
       state             : string; (* "str(available)" *)
-      utc_created_on    : string;
       website           : string option;
       description       : string option;
       has_issues        : bool;
       is_private        : bool;
       name              : string;
       language          : string;
-      utc_last_updated  : string;
       email_writers     : bool;
       no_public_forks   : bool;
       resource_uri      : string;