-- | 'SendMessage' constructor.
--
-- The fields accessible through corresponding lenses are:
--
-- * 'smDelaySeconds' @::@ 'Maybe' 'Int'
--
-- * 'smMessageAttributes' @::@ 'HashMap' 'Text' 'MessageAttributeValue'
--
-- * 'smMessageBody' @::@ 'Text'
--
-- * 'smQueueUrl' @::@ 'Text'
--
sendMessage :: Text -- ^ 'smQueueUrl'
            -> Text -- ^ 'smMessageBody'
            -> SendMessage
sendMessage p1 p2 = SendMessage
    { _smQueueUrl          = p1
    , _smMessageBody       = p2
    , _smDelaySeconds      = Nothing
    , _smMessageAttributes = mempty
    }
sendMessage :: Text -- ^ 'smQueueUrl'
            -> Text -- ^ 'smMessageBody'
            -> SendMessage
sendMessage p1 p2 = SendMessage
    { _smQueueUrl          = p1
    , _smMessageBody       = p2
    , _smDelaySeconds      = Nothing
    , _smMessageAttributes = mempty
    }
sendMessage p1 p2 = SendMessage
    { _smQueueUrl          = p1
    , _smMessageBody       = p2
    , _smDelaySeconds      = Nothing
    , _smMessageAttributes = mempty
    }