Ran hlint and fixed 4 suggestions