From afca0b6c690dcf09990288dc05a59af865488a29 Mon Sep 17 00:00:00 2001
From: Maram <mnay1u19@soton.ac.uk>
Date: Wed, 28 Apr 2021 19:58:58 +0100
Subject: [PATCH] modified readCSV

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

diff --git a/CSV.hs b/CSV.hs
index 880ade3..39d0c4a 100644
--- a/CSV.hs
+++ b/CSV.hs
@@ -9,7 +9,7 @@ readCSV fname = do
     return $ readCSVString str
 
 readCSVString :: String -> [[String]]
-readCSVString whole = [splitElem ',' (line++" ")  | line <- splitElem '\n' whole]
+readCSVString whole = [splitElem ',' (line++" " )  | line <- splitElem '\n' whole]
 splitElem :: Eq a => a -> [a] -> [[a]]
 splitElem elem = split (/=elem)
 
-- 
GitLab