Values.CreateContinuousDeploymentPolicyResultSourceCreates a continuous deployment policy that distributes traffic for a custom domain name to two different CloudFront distributions. To use a continuous deployment policy, first use CopyDistribution to create a staging distribution, then use UpdateDistribution to modify the staging distribution's configuration. After you create and update a staging distribution, you can use a continuous deployment policy to incrementally move traffic to the staging distribution. This workflow enables you to test changes to a distribution's configuration before moving all of your domain's production traffic to the new configuration.
type nonrec t = {continuousDeploymentPolicy : ContinuousDeploymentPolicy.t option;A continuous deployment policy.
*)location : String_.t option;The location of the continuous deployment policy.
*)eTag : String_.t option;The version identifier for the current version of the continuous deployment policy.
*)}type nonrec error = [ | `AccessDenied of AccessDenied.t| `ContinuousDeploymentPolicyAlreadyExists of
ContinuousDeploymentPolicyAlreadyExists.t| `InconsistentQuantities of InconsistentQuantities.t| `InvalidArgument of InvalidArgument.t| `StagingDistributionInUse of StagingDistributionInUse.t| `TooManyContinuousDeploymentPolicies of TooManyContinuousDeploymentPolicies.t| `Unknown_operation_error of string * string option ]val error_of_json :
string ->
Yojson.Safe.t ->
[> `AccessDenied of AccessDenied.t
| `ContinuousDeploymentPolicyAlreadyExists of
ContinuousDeploymentPolicyAlreadyExists.t
| `InconsistentQuantities of InconsistentQuantities.t
| `InvalidArgument of InvalidArgument.t
| `StagingDistributionInUse of StagingDistributionInUse.t
| `TooManyContinuousDeploymentPolicies of
TooManyContinuousDeploymentPolicies.t
| `Unknown_operation_error of string * string option ]val error_of_xml :
string ->
Awso.Xml.t ->
[> `AccessDenied of AccessDenied.t
| `ContinuousDeploymentPolicyAlreadyExists of
ContinuousDeploymentPolicyAlreadyExists.t
| `InconsistentQuantities of InconsistentQuantities.t
| `InvalidArgument of InvalidArgument.t
| `StagingDistributionInUse of StagingDistributionInUse.t
| `TooManyContinuousDeploymentPolicies of
TooManyContinuousDeploymentPolicies.t
| `Unknown_operation_error of string * string option ]val of_header_and_body :
((string, String_.t) Awso.Import.List.Assoc.t * ContinuousDeploymentPolicy.t) ->
tval to_value :
t ->
[> `Structure of
(string
* [> `String of String_.t
| `Structure of
(string
* [> `String of String_.t
| `Structure of
(string
* [> `Boolean of Boolean.t
| `Structure of
(string
* [> `Enum of string
| `Integer of Integer.t
| `List of [> `String of String_.t ] list
| `Structure of
(string
* [> `Float of Float_.t
| `String of String_.t
| `Structure of
(string * [> `Integer of Integer.t ]) list ])
list ])
list ])
list
| `Timestamp of Timestamp.t ])
list ])
list ]