Module GapiDriveV2Model.Comment

module Context : 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 : User.t;(*

The user who wrote this comment.

*)
commentId : string;(*

The ID of the comment.

*)
content : string;(*

The plain text content used to create this comment. This is not HTML safe and should only be used as a starting point to make edits to a comment's content.

*)
context : Context.t;(*

The context of the file which is being commented on.

*)
createdDate : GapiDate.t;(*

The date when this comment was first created.

*)
deleted : bool;(*

Whether this comment has been deleted. If a comment has been deleted the content will be cleared and this will only represent a comment that once existed.

*)
fileId : string;(*

The file which this comment is addressing.

*)
fileTitle : string;(*

The title of the file which this comment is addressing.

*)
htmlContent : string;(*

HTML formatted content for this comment.

*)
kind : string;(*

This is always drive#comment.

*)
modifiedDate : GapiDate.t;(*

The date when this comment or any of its replies were last modified.

*)
replies : CommentReply.t list;(*

Replies to this post.

*)
status : string;(*

The status of this comment. Status can be changed by posting a reply to a comment with the desired status.

  • "open" - The comment is still open.
  • "resolved" - The comment has been resolved by one of its replies.
*)
}
val anchor : ( t, string ) GapiLens.t
val author : ( t, User.t ) GapiLens.t
val commentId : ( t, string ) GapiLens.t
val content : ( t, string ) GapiLens.t
val context : ( t, Context.t ) GapiLens.t
val createdDate : ( t, GapiDate.t ) GapiLens.t
val deleted : ( t, bool ) GapiLens.t
val fileId : ( t, string ) GapiLens.t
val fileTitle : ( t, string ) GapiLens.t
val htmlContent : ( t, string ) GapiLens.t
val kind : ( t, string ) GapiLens.t
val modifiedDate : ( t, GapiDate.t ) GapiLens.t
val replies : ( t, CommentReply.t list ) GapiLens.t
val status : ( t, string ) 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