Added feature of forming reponse into text

1 files changed, 1 insertions, 1 deletions

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