Fix the time_stamp_format and the timestamp pickler for time-1.4.2.

[dead/htsn-import.git] / src / TSN / Parse.hs

diff --git a/src/TSN/Parse.hs b/src/TSN/Parse.hs
index d707f5fd9575a4d2945f0285204145e0b44b5117..8dbdf1fd957debdaa9322fba7da3e142884a2465 100644 (file)
--- a/src/TSN/Parse.hs
+++ b/src/TSN/Parse.hs
@@ -184,15 +184,15 @@ time_format = "%I:%M %p"
 
 
 
--- | The format string for a time_stamp. We keep the leading/trailing
---   space so that parseTime and formatTime are inverses are one
---   another, even though there is some confusion as to how these two
---   functions should behave:
+-- | The format string for a time_stamp. We have removed the
+--   leading/trailing space so that parseTime and formatTime are NOT
+--   inverses of one another. We should be able to rectify this once
+--   everything is updated to support time-1.5. See,
 --
 --   <https://ghc.haskell.org/trac/ghc/ticket/9150>
 --
 time_stamp_format :: String
-time_stamp_format = " %B %-d, %Y, at " ++ time_format ++ " ET "
+time_stamp_format = "%B %-d, %Y, at " ++ time_format ++ " ET"