From 4fcd63d7bb83ef91141ccf4ba721934c3c1107ba Mon Sep 17 00:00:00 2001 From: Franklin Antony Date: Tue, 8 Dec 2020 17:03:30 +0000 Subject: [PATCH] Updated write file --- app/Main.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/app/Main.hs b/app/Main.hs index ed1a73b..16703d2 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -81,8 +81,8 @@ main = do -- TODO - JSON Conversion code is below jsonValue <- convertToJSON conn print $ show jsonValue - -- TOJSON Conversion -> writing into file should be added below - -- I.writeFile "DB.json" jsonValue + -- TODO - JSON Conversion -> writing into file should be added below + -- writeFile "DB.json" jsonValue print "Done!" putStrLn "\n****************"