sig
module Verification :
sig
type t = { adHocVerified : string; }
val adHocVerified :
(GapiPlusV1Model.Activity.Actor.Verification.t, string) GapiLens.t
val empty : GapiPlusV1Model.Activity.Actor.Verification.t
val render :
GapiPlusV1Model.Activity.Actor.Verification.t ->
GapiJson.json_data_model list
val parse :
GapiPlusV1Model.Activity.Actor.Verification.t ->
GapiJson.json_data_model ->
GapiPlusV1Model.Activity.Actor.Verification.t
end
module Name :
sig
type t = { familyName : string; givenName : string; }
val familyName :
(GapiPlusV1Model.Activity.Actor.Name.t, string) GapiLens.t
val givenName :
(GapiPlusV1Model.Activity.Actor.Name.t, string) GapiLens.t
val empty : GapiPlusV1Model.Activity.Actor.Name.t
val render :
GapiPlusV1Model.Activity.Actor.Name.t ->
GapiJson.json_data_model list
val parse :
GapiPlusV1Model.Activity.Actor.Name.t ->
GapiJson.json_data_model -> GapiPlusV1Model.Activity.Actor.Name.t
end
module Image :
sig
type t = { url : string; }
val url : (GapiPlusV1Model.Activity.Actor.Image.t, string) GapiLens.t
val empty : GapiPlusV1Model.Activity.Actor.Image.t
val render :
GapiPlusV1Model.Activity.Actor.Image.t ->
GapiJson.json_data_model list
val parse :
GapiPlusV1Model.Activity.Actor.Image.t ->
GapiJson.json_data_model -> GapiPlusV1Model.Activity.Actor.Image.t
end
module ClientSpecificActorInfo :
sig
module YoutubeActorInfo :
sig
type t = { channelId : string; }
val channelId :
(GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.YoutubeActorInfo.t,
string)
GapiLens.t
val empty :
GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.YoutubeActorInfo.t
val render :
GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.YoutubeActorInfo.t ->
GapiJson.json_data_model list
val parse :
GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.YoutubeActorInfo.t ->
GapiJson.json_data_model ->
GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.YoutubeActorInfo.t
end
type t = {
youtubeActorInfo :
GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.YoutubeActorInfo.t;
}
val youtubeActorInfo :
(GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.t,
GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.YoutubeActorInfo.t)
GapiLens.t
val empty : GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.t
val render :
GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.t ->
GapiJson.json_data_model list
val parse :
GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.t ->
GapiJson.json_data_model ->
GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.t
end
type t = {
clientSpecificActorInfo :
GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.t;
displayName : string;
id : string;
image : GapiPlusV1Model.Activity.Actor.Image.t;
name : GapiPlusV1Model.Activity.Actor.Name.t;
url : string;
verification : GapiPlusV1Model.Activity.Actor.Verification.t;
}
val clientSpecificActorInfo :
(GapiPlusV1Model.Activity.Actor.t,
GapiPlusV1Model.Activity.Actor.ClientSpecificActorInfo.t)
GapiLens.t
val displayName : (GapiPlusV1Model.Activity.Actor.t, string) GapiLens.t
val id : (GapiPlusV1Model.Activity.Actor.t, string) GapiLens.t
val image :
(GapiPlusV1Model.Activity.Actor.t,
GapiPlusV1Model.Activity.Actor.Image.t)
GapiLens.t
val name :
(GapiPlusV1Model.Activity.Actor.t, GapiPlusV1Model.Activity.Actor.Name.t)
GapiLens.t
val url : (GapiPlusV1Model.Activity.Actor.t, string) GapiLens.t
val verification :
(GapiPlusV1Model.Activity.Actor.t,
GapiPlusV1Model.Activity.Actor.Verification.t)
GapiLens.t
val empty : GapiPlusV1Model.Activity.Actor.t
val render :
GapiPlusV1Model.Activity.Actor.t -> GapiJson.json_data_model list
val parse :
GapiPlusV1Model.Activity.Actor.t ->
GapiJson.json_data_model -> GapiPlusV1Model.Activity.Actor.t
end