{-# LANGUAGE OverloadedStrings #-}
module Yesod.Default.Handlers
    ( getFaviconR
    , getRobotsR
    ) where

import Yesod.Core

getFaviconR :: MonadHandler m => m ()
getFaviconR :: forall (m :: * -> *). MonadHandler m => m ()
getFaviconR = forall (m :: * -> *) a.
MonadHandler m =>
ContentType -> FilePath -> m a
sendFile ContentType
"image/x-icon" FilePath
"config/favicon.ico"

getRobotsR :: MonadHandler m => m ()
getRobotsR :: forall (m :: * -> *). MonadHandler m => m ()
getRobotsR = forall (m :: * -> *) a.
MonadHandler m =>
ContentType -> FilePath -> m a
sendFile ContentType
"text/plain" FilePath
"config/robots.txt"