{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.Route53RecoveryReadiness.Types.Recommendation -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) module Amazonka.Route53RecoveryReadiness.Types.Recommendation where import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import qualified Amazonka.Prelude as Prelude -- | Recommendations that are provided to make an application more recovery -- resilient. -- -- /See:/ 'newRecommendation' smart constructor. data Recommendation = Recommendation' { -- | Text of the recommendations that are provided to make an application -- more recovery resilient. recommendationText :: Prelude.Text } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'Recommendation' with all optional fields omitted. -- -- Use or to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'recommendationText', 'recommendation_recommendationText' - Text of the recommendations that are provided to make an application -- more recovery resilient. newRecommendation :: -- | 'recommendationText' Prelude.Text -> Recommendation newRecommendation pRecommendationText_ = Recommendation' { recommendationText = pRecommendationText_ } -- | Text of the recommendations that are provided to make an application -- more recovery resilient. recommendation_recommendationText :: Lens.Lens' Recommendation Prelude.Text recommendation_recommendationText = Lens.lens (\Recommendation' {recommendationText} -> recommendationText) (\s@Recommendation' {} a -> s {recommendationText = a} :: Recommendation) instance Data.FromJSON Recommendation where parseJSON = Data.withObject "Recommendation" ( \x -> Recommendation' Prelude.<$> (x Data..: "recommendationText") ) instance Prelude.Hashable Recommendation where hashWithSalt _salt Recommendation' {..} = _salt `Prelude.hashWithSalt` recommendationText instance Prelude.NFData Recommendation where rnf Recommendation' {..} = Prelude.rnf recommendationText