Skip to content
Snippets Groups Projects
Commit 19f02fa1 authored by Ashley Yakeley's avatar Ashley Yakeley
Browse files

test: fix formatting "z" with widths tests

parent 7767c804
No related branches found
No related tags found
No related merge requests found
......@@ -69,6 +69,10 @@ unixWorkarounds "%_G" s = padN 4 ' ' s
unixWorkarounds "%0G" s = padN 4 '0' s
unixWorkarounds "%_f" s = padN 2 ' ' s
unixWorkarounds "%0f" s = padN 2 '0' s
unixWorkarounds fmt s | elem 'z' fmt = dropWhile isPadChar s where
isPadChar ' ' = True
isPadChar '0' = True
isPadChar _ = False
unixWorkarounds _ s = s
compareFormat :: (String -> String) -> String -> TimeZone -> UTCTime -> Result
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment