libraries/time: parseTime barfs on leading space in format string
This used to work around 1.4.0, one of my test suites caught it:
module Main
where
import Data.Time.Clock
import Data.Time.Format
import System.Locale
main :: IO ()
main = do
putStrLn "Trailing space is handled:"
print $ (parseTime defaultTimeLocale "%M " "15 " :: Maybe UTCTime)
putStrLn "\nBut leading space isn't:"
print $ (parseTime defaultTimeLocale " %M" " 15" :: Maybe UTCTime)Trac metadata
| Trac field | Value |
|---|---|
| Version | 7.8.2 |
| Type | Bug |
| TypeOfFailure | OtherFailure |
| Priority | normal |
| Resolution | Unresolved |
| Component | libraries (other) |
| Test case | |
| Differential revisions | |
| BlockedBy | |
| Related | |
| Blocking | |
| CC | |
| Operating system | |
| Architecture |