From: Michael Orlitzky <michael@orlitzky.com>
Date: Thu, 29 May 2014 17:01:32 +0000 (-0400)
Subject: Remove leading/trailing space from the time_stamp format string (GHC bug #9150).
X-Git-Tag: 0.0.5~1
X-Git-Url: http://gitweb.michael.orlitzky.com/?p=dead%2Fhtsn-import.git;a=commitdiff_plain;h=4f5008904b96579e6653e19ddaccc5d53824ab04

Remove leading/trailing space from the time_stamp format string (GHC bug #9150).
---

diff --git a/src/TSN/Picklers.hs b/src/TSN/Picklers.hs
index c70b2ba..e188953 100644
--- a/src/TSN/Picklers.hs
+++ b/src/TSN/Picklers.hs
@@ -132,7 +132,7 @@ xp_time_stamp =
   (to_time_stamp, from_time_stamp) `xpWrapMaybe` xpText
   where
     -- This omits the timezone and trailing space.
-    format = " %B %-d, %Y, at " ++ xp_time_format ++ " ET "
+    format = "%B %-d, %Y, at " ++ xp_time_format ++ " ET"
 
     five_hours :: NominalDiffTime
     five_hours = 5 * 60 * 60