aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/Utils/ScoresFile.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Utils/ScoresFile.hs')
-rw-r--r--src/Utils/ScoresFile.hs2
1 files changed, 1 insertions, 1 deletions
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