diff options
Diffstat (limited to 'Web/Router.hs')
| -rw-r--r-- | Web/Router.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Web/Router.hs b/Web/Router.hs index af5bd96..234f30a 100644 --- a/Web/Router.hs +++ b/Web/Router.hs @@ -1,11 +1,13 @@ module Web.Router where +import Data.Text (Text) + import Web.Response import Web.Request import Web.Http -- Route callback url method -data Route = Route (Request -> IO Response) String Method +data Route = Route (Request -> IO Response) Text Method resolve :: [Route] -> Request -> IO Response resolve [] _ = return notFoundResponse |