From 89d586750fc7153f025f2e867b1205fd188d83d8 Mon Sep 17 00:00:00 2001
From: Neil Smith <neil.git@njae.me.uk>
Date: Tue, 6 Dec 2016 08:55:03 +0000
Subject: [PATCH] Tidyied linebreaks

---
 advent04.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/advent04.hs b/advent04.hs
index e48c257..135ad37 100644
--- a/advent04.hs
+++ b/advent04.hs
@@ -44,7 +44,8 @@ parseLine line = Room {name=name, sector=sector, checksum=checksum}
 
 countedLetters :: String -> [(Char, Int)]
 countedLetters name = sortBy sortCLetter $ unsortedCountedLetters name
-    where unsortedCountedLetters name = Map.toList $ Map.fromListWith (+) [(c, 1) | c <- filter (isLetter) name]
+    where unsortedCountedLetters name = 
+            Map.toList $ Map.fromListWith (+) [(c, 1) | c <- filter (isLetter) name]
 
 sortCLetter :: (Char, Int) -> (Char, Int) -> Ordering
 sortCLetter (l1, n1) (l2, n2)
-- 
2.34.1