module Effectful.Zoo.Amazonka.Api.Log
  ( awsLogLevelToSeverity,
  ) where

import Amazonka qualified as AWS
import Effectful.Zoo.Amazonka.Data
import Effectful.Zoo.Log.Data.Severity

awsLogLevelToSeverity :: ()
  => AwsLogLevel
  -> Severity
awsLogLevelToSeverity :: AwsLogLevel -> Severity
awsLogLevelToSeverity = \case
  AwsLogLevel
AWS.Trace -> Severity
Trace
  AwsLogLevel
AWS.Debug -> Severity
Debug
  AwsLogLevel
AWS.Info  -> Severity
Info
  AwsLogLevel
AWS.Error -> Severity
Error