WorkSpacesWeb.UserSettings
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-workspacesweb-usersettings.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-resource-tags.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-workspacesweb-usersettings-cookiespecification.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-workspacesweb-usersettings-cookiesynchronizationconfiguration.html
type properties = {
idle_disconnect_timeout_in_minutes : float option;
upload_allowed : string;
customer_managed_key : string option;
additional_encryption_context : string Stdlib__Map.Make(Stdlib.String).t option;
disconnect_timeout_in_minutes : float option;
print_allowed : string;
copy_allowed : string;
download_allowed : string;
paste_allowed : string;
}
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-workspacesweb-usersettings.html;
val make_properties :
?idle_disconnect_timeout_in_minutes:float ->
upload_allowed:string ->
?customer_managed_key:string ->
?additional_encryption_context:string Stdlib__Map.Make(Stdlib.String).t ->
?disconnect_timeout_in_minutes:float ->
print_allowed:string ->
copy_allowed:string ->
?cookie_synchronization_configuration:cookie_synchronization_configuration ->
download_allowed:string ->
paste_allowed:string ->
?tags:tag list ->
unit ->
properties
val make_tag : value:string -> key:string -> unit -> tag
val make_cookie_specification :
?path:string ->
domain:string ->
?name:string ->
unit ->
cookie_specification
val make_cookie_synchronization_configuration :
?blocklist:cookie_specification list ->
allowlist:cookie_specification list ->
unit ->
cookie_synchronization_configuration
val yojson_of_tag : tag -> [> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_cookie_specification : cookie_specification -> Yojson.Safe.t
val yojson_of_cookie_synchronization_configuration :
cookie_synchronization_configuration ->
[> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_properties :
properties ->
[> `Assoc of (string * Yojson.Safe.t) list ]
val create_attributes : string -> attributes