X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FTSN%2FPicklers.hs;h=e188953eb952ced6840d67ab892b0400482f02c8;hb=4f5008904b96579e6653e19ddaccc5d53824ab04;hp=c70b2ba84edc5d627575622d1bb2a609f99bb195;hpb=fa83a86f2277a7095b8a922f7c16646ca9154471;p=dead%2Fhtsn-import.git 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