From 0093cbc556c735d148b571011a45ad32c567d62d Mon Sep 17 00:00:00 2001
From: Andrew <saintruler@gmail.com>
Date: Fri, 27 Nov 2020 18:49:06 +0400
Subject: Added feature of forming reponse into text

---
 Main.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Main.hs')

diff --git a/Main.hs b/Main.hs
index aefc95c..3ebb7d1 100644
--- a/Main.hs
+++ b/Main.hs
@@ -14,4 +14,4 @@ table = [ Route indexGet (T.pack "/") GET
 
 main = do
   response <- resolve table (Request [] (T.pack "/hello") GET)
-  print $ response
\ No newline at end of file
+  print $ formResponse response
\ No newline at end of file
-- 
cgit v1.2.3