{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.MediaStore.Types.MethodName
-- 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.MediaStore.Types.MethodName
  ( MethodName
      ( ..,
        MethodName_DELETE,
        MethodName_GET,
        MethodName_HEAD,
        MethodName_PUT
      ),
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude

newtype MethodName = MethodName'
  { fromMethodName ::
      Data.Text
  }
  deriving stock
    ( Prelude.Show,
      Prelude.Read,
      Prelude.Eq,
      Prelude.Ord,
      Prelude.Generic
    )
  deriving newtype
    ( Prelude.Hashable,
      Prelude.NFData,
      Data.FromText,
      Data.ToText,
      Data.ToByteString,
      Data.ToLog,
      Data.ToHeader,
      Data.ToQuery,
      Data.FromJSON,
      Data.FromJSONKey,
      Data.ToJSON,
      Data.ToJSONKey,
      Data.FromXML,
      Data.ToXML
    )

pattern MethodName_DELETE :: MethodName
pattern MethodName_DELETE = MethodName' "DELETE"

pattern MethodName_GET :: MethodName
pattern MethodName_GET = MethodName' "GET"

pattern MethodName_HEAD :: MethodName
pattern MethodName_HEAD = MethodName' "HEAD"

pattern MethodName_PUT :: MethodName
pattern MethodName_PUT = MethodName' "PUT"

{-# COMPLETE
  MethodName_DELETE,
  MethodName_GET,
  MethodName_HEAD,
  MethodName_PUT,
  MethodName'
  #-}