# OPTIONS_GHC -fno - warn - warnings - deprecations #

module Web.Apiary.Develop {-# WARNING "use Web.Apiary in production." #-}
    ( file, file'
    , module Web.Apiary
    ) where

import Web.Apiary hiding (file, file')
import Control.Monad.Apiary.Action (devFile, devFile')

-- | send file contents as lazy bytestring response with detect
-- Content-Type. since v1.2.0.
file :: MonadIO m => FilePath -> Maybe FilePart -> ActionT exts prms m ()
file f _ = devFile f

-- | send file contents as lazy bytestring response. since v1.2.0.
file' :: MonadIO m => FilePath -> Maybe FilePart -> ActionT exts prms m ()
file' f _ = devFile' f

# WARNING "use Web.Apiary in production." #
 | send file contents as lazy bytestring response with detect
 Content-Type. since v1.2.0.
 | send file contents as lazy bytestring response. since v1.2.0.
# OPTIONS_GHC -fno - warn - warnings - deprecations #

    ( file, file'
    , module Web.Apiary
    ) where

import Web.Apiary hiding (file, file')
import Control.Monad.Apiary.Action (devFile, devFile')

file :: MonadIO m => FilePath -> Maybe FilePart -> ActionT exts prms m ()
file f _ = devFile f

file' :: MonadIO m => FilePath -> Maybe FilePart -> ActionT exts prms m ()
file' f _ = devFile' f
