{-# LANGUAGE Safe #-}
module Web.Frank
( get
, post
, put
, patch
, delete
, options
) where
import Network.HTTP.Types
import Web.Simple.Controller.Trans
import Data.Text (Text)
frankMethod :: Monad m
=> StdMethod -> Text -> ControllerT s m a
-> ControllerT s m ()
frankMethod :: forall (m :: * -> *) s a.
Monad m =>
StdMethod -> Text -> ControllerT s m a -> ControllerT s m ()
frankMethod StdMethod
method Text
pattern = forall (m :: * -> *) s a.
Monad m =>
StdMethod -> ControllerT s m a -> ControllerT s m ()
routeMethod StdMethod
method forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall (m :: * -> *) s a.
Monad m =>
Text -> ControllerT s m a -> ControllerT s m ()
routePattern Text
pattern forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall (m :: * -> *) s a.
Monad m =>
ControllerT s m a -> ControllerT s m ()
routeTop
get :: Monad m => Text -> ControllerT s m a -> ControllerT s m ()
get :: forall (m :: * -> *) s a.
Monad m =>
Text -> ControllerT s m a -> ControllerT s m ()
get = forall (m :: * -> *) s a.
Monad m =>
StdMethod -> Text -> ControllerT s m a -> ControllerT s m ()
frankMethod StdMethod
GET
post :: Monad m => Text -> ControllerT s m a -> ControllerT s m ()
post :: forall (m :: * -> *) s a.
Monad m =>
Text -> ControllerT s m a -> ControllerT s m ()
post = forall (m :: * -> *) s a.
Monad m =>
StdMethod -> Text -> ControllerT s m a -> ControllerT s m ()
frankMethod StdMethod
POST
put :: Monad m => Text -> ControllerT s m a -> ControllerT s m ()
put :: forall (m :: * -> *) s a.
Monad m =>
Text -> ControllerT s m a -> ControllerT s m ()
put = forall (m :: * -> *) s a.
Monad m =>
StdMethod -> Text -> ControllerT s m a -> ControllerT s m ()
frankMethod StdMethod
PUT
patch :: Monad m => Text -> ControllerT s m a -> ControllerT s m ()
patch :: forall (m :: * -> *) s a.
Monad m =>
Text -> ControllerT s m a -> ControllerT s m ()
patch = forall (m :: * -> *) s a.
Monad m =>
StdMethod -> Text -> ControllerT s m a -> ControllerT s m ()
frankMethod StdMethod
PATCH
delete :: Monad m => Text -> ControllerT s m a -> ControllerT s m ()
delete :: forall (m :: * -> *) s a.
Monad m =>
Text -> ControllerT s m a -> ControllerT s m ()
delete = forall (m :: * -> *) s a.
Monad m =>
StdMethod -> Text -> ControllerT s m a -> ControllerT s m ()
frankMethod StdMethod
DELETE
options :: Monad m => Text -> ControllerT s m a -> ControllerT s m ()
options :: forall (m :: * -> *) s a.
Monad m =>
Text -> ControllerT s m a -> ControllerT s m ()
options = forall (m :: * -> *) s a.
Monad m =>
StdMethod -> Text -> ControllerT s m a -> ControllerT s m ()
frankMethod StdMethod
OPTIONS