From a0e8e5a91d15ed8c79f4a1b5914d3a6242c0cbd3 Mon Sep 17 00:00:00 2001
From: Andrew Guschin <guschin.drew@gmail.com>
Date: Sun, 5 Mar 2023 13:45:37 +0400
Subject: Migrated project to cabal

---
 Web/Router.hs | 17 -----------------
 1 file changed, 17 deletions(-)
 delete mode 100644 Web/Router.hs

(limited to 'Web/Router.hs')

diff --git a/Web/Router.hs b/Web/Router.hs
deleted file mode 100644
index 234f30a..0000000
--- a/Web/Router.hs
+++ /dev/null
@@ -1,17 +0,0 @@
-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) Text Method
-
-resolve :: [Route] -> Request -> IO Response
-resolve [] _ = return notFoundResponse
-resolve (Route callback routeUrl _ : routerTable) req @ (Request _ url _) =
-  if url == routeUrl then
-    callback req
-  else resolve routerTable req
-- 
cgit v1.2.3