more hlint

This commit is contained in:
Joey Hess 2014-02-11 01:35:11 -04:00
parent 4515fa10aa
commit 40cec65ace
6 changed files with 34 additions and 44 deletions

View file

@ -330,7 +330,7 @@ preSanitizeKeyName = concatMap escape
-- other characters. By itself, it is escaped to
-- doubled form.
| c == ',' = ",,"
| otherwise = ',' : show(ord(c))
| otherwise = ',' : show (ord c)
{- Converts a key into a filename fragment without any directory.
-