From 4fb1b14ddd1f315364c9b592973b06dce55e25b5 Mon Sep 17 00:00:00 2001
From: Sean Whitton <spwhitton@spwhitton.name>
Date: Mon, 30 Mar 2015 19:18:21 +0900
Subject: alignment

---
 src/Utility/EventCache.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Utility/EventCache.hs b/src/Utility/EventCache.hs
index 9b871ab..6b49bba 100644
--- a/src/Utility/EventCache.hs
+++ b/src/Utility/EventCache.hs
@@ -85,7 +85,7 @@ fileIsOldCache today file = length splitFile == 3
 readDay   :: String -> Maybe Day
 readDay s = do
     yearString:monthString:dayString:[] <- return $ splitOn "-" s
-    year <- readMaybe yearString
+    year  <- readMaybe yearString
     month <- readMaybe monthString
-    day <- readMaybe dayString
+    day   <- readMaybe dayString
     return $ fromGregorian year month day
-- 
cgit v1.2.3