module Stratosphere.QuickSight.Analysis.SheetImageTooltipConfigurationProperty ( module Exports, SheetImageTooltipConfigurationProperty(..), mkSheetImageTooltipConfigurationProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import {-# SOURCE #-} Stratosphere.QuickSight.Analysis.SheetImageTooltipTextProperty as Exports import Stratosphere.ResourceProperties import Stratosphere.Value data SheetImageTooltipConfigurationProperty = -- | See: SheetImageTooltipConfigurationProperty {haddock_workaround_ :: (), -- | See: tooltipText :: (Prelude.Maybe SheetImageTooltipTextProperty), -- | See: visibility :: (Prelude.Maybe (Value Prelude.Text))} deriving stock (Prelude.Eq, Prelude.Show) mkSheetImageTooltipConfigurationProperty :: SheetImageTooltipConfigurationProperty mkSheetImageTooltipConfigurationProperty = SheetImageTooltipConfigurationProperty {haddock_workaround_ = (), tooltipText = Prelude.Nothing, visibility = Prelude.Nothing} instance ToResourceProperties SheetImageTooltipConfigurationProperty where toResourceProperties SheetImageTooltipConfigurationProperty {..} = ResourceProperties {awsType = "AWS::QuickSight::Analysis.SheetImageTooltipConfiguration", supportsTags = Prelude.False, properties = Prelude.fromList (Prelude.catMaybes [(JSON..=) "TooltipText" Prelude.<$> tooltipText, (JSON..=) "Visibility" Prelude.<$> visibility])} instance JSON.ToJSON SheetImageTooltipConfigurationProperty where toJSON SheetImageTooltipConfigurationProperty {..} = JSON.object (Prelude.fromList (Prelude.catMaybes [(JSON..=) "TooltipText" Prelude.<$> tooltipText, (JSON..=) "Visibility" Prelude.<$> visibility])) instance Property "TooltipText" SheetImageTooltipConfigurationProperty where type PropertyType "TooltipText" SheetImageTooltipConfigurationProperty = SheetImageTooltipTextProperty set newValue SheetImageTooltipConfigurationProperty {..} = SheetImageTooltipConfigurationProperty {tooltipText = Prelude.pure newValue, ..} instance Property "Visibility" SheetImageTooltipConfigurationProperty where type PropertyType "Visibility" SheetImageTooltipConfigurationProperty = Value Prelude.Text set newValue SheetImageTooltipConfigurationProperty {..} = SheetImageTooltipConfigurationProperty {visibility = Prelude.pure newValue, ..}