diff --git a/src/Lib.hs b/src/Lib.hs index caa4dc7..82b35dd 100644 --- a/src/Lib.hs +++ b/src/Lib.hs @@ -142,6 +142,9 @@ sanitize text = & T.unwords . T.words & T.unpack & filter validChars + & T.pack + & T.toLower + & T.unpack & titlecase & T.pack