effectful-zoo-0.0.0.1: components/log/Effectful/Zoo/Log/Api/Render.hs

module Effectful.Zoo.Log.Api.Render
  ( defaultRenderLogToText,
  ) where

import Effectful.Zoo.Log.Data.Severity
import HaskellWorks.Prelude hiding (log)
import HaskellWorks.ToText

defaultRenderLogToText :: ToText i => Severity -> i -> Text
defaultRenderLogToText severity i =
  "[" <> toText severity <> "] " <> toText i