ethereum-analyzer-webui-1.0.0: src/Ethereum/Analyzer/Web/API/Internal.hs

-- | Definition of HTML content type.
module Ethereum.Analyzer.Web.API.Internal
  ( HTML
  ) where

import Network.HTTP.Media ((//), (/:))
import Servant.API (Accept(..))

-- | HTML content type.
data HTML =
  HTML

instance Accept HTML where
  contentType _ = "text" // "html" /: ("charset", "utf-8")