From f764d43034af7c715523405cef0e608402bb7dae Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sun, 22 Mar 2015 03:39:05 +0000 Subject: TODO --- src/Utils/ScoresFile.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Utils/ScoresFile.hs b/src/Utils/ScoresFile.hs index f1cf806..73e4d34 100644 --- a/src/Utils/ScoresFile.hs +++ b/src/Utils/ScoresFile.hs @@ -23,7 +23,7 @@ scoresToCSV = unlines . foldr step [] step (theClass, (Score x y)) theLines = (show theClass ++ "," ++ show x ++ "," ++ show y) : theLines --- no malformed CSV handling here yet! +-- TODO: no malformed CSV handling here yet scoresFromCSV :: String -> ScoresList scoresFromCSV csv = foldr step [] (lines csv) where -- cgit v1.2.3