diff options
Diffstat (limited to 'src/Utils/ScoresFile.hs')
-rw-r--r-- | src/Utils/ScoresFile.hs | 2 |
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 |