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 : (tUser.t) GapiLens.t
val commentId : (t, string) GapiLens.t
val content : (t, string) GapiLens.t
val context : (tContext.t) GapiLens.t
val createdDate : (tGapiDate.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 : (tGapiDate.t) GapiLens.t
val replies : (tCommentReply.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