Previous  Up  Next

Module GapiDriveV3Model.Comment

module Comment: sig .. end
module QuotedFileContent: sig .. end
type t = {
   anchor : string; (*
A region of the document represented as a JSON string. See anchor documentation for details on how to define and interpret anchor properties.
*)
   author : GapiDriveV3Model.User.t; (*
The user who created the comment.
*)
   content : string; (*
The plain text content of the comment. This field is used for setting the content, while htmlContent should be displayed.
*)
   createdTime : GapiDate.t; (*
The time at which the comment was created (RFC 3339 date-time).
*)
   deleted : bool; (*
Whether the comment has been deleted. A deleted comment has no content.
*)
   htmlContent : string; (*
The content of the comment with HTML formatting.
*)
   id : string; (*
The ID of the comment.
*)
   kind : string; (*
Identifies what kind of resource this is. Value: the fixed string "drive#comment".
*)
   modifiedTime : GapiDate.t; (*
The last time the comment or any of its replies was modified (RFC 3339 date-time).
*)
   quotedFileContent : QuotedFileContent.t; (*
The file content to which the comment refers, typically within the anchor region. For a text file, for example, this would be the text at the location of the comment.
*)
   replies : GapiDriveV3Model.Reply.t list; (*
The full list of replies to the comment in chronological order.
*)
   resolved : bool; (*
Whether the comment has been resolved by one of its replies.
*)
} 
val anchor : (t, string) GapiLens.t
val author : (t, GapiDriveV3Model.User.t) GapiLens.t
val content : (t, string) GapiLens.t
val createdTime : (t, GapiDate.t) GapiLens.t
val deleted : (t, bool) GapiLens.t
val htmlContent : (t, string) GapiLens.t
val id : (t, string) GapiLens.t
val kind : (t, string) GapiLens.t
val modifiedTime : (t, GapiDate.t) GapiLens.t
val quotedFileContent : (t, QuotedFileContent.t)
       GapiLens.t
val replies : (t, GapiDriveV3Model.Reply.t list) GapiLens.t
val resolved : (t, bool) GapiLens.t
val empty : t
val render : t -> GapiJson.json_data_model list
val parse : t ->
       GapiJson.json_data_model -> t
val to_data_model : t -> GapiJson.json_data_model
val of_data_model : GapiJson.json_data_model -> t