on master help sign in
Merge pull request #273 from lpsmith/zonedtime-tweaks
dbbf824Bryan O'Sullivan
Data/Aeson/Encode/Builder.hs+1−1
@@ -208,7 +208,7 @@ timeOfDay64 (TOD h m s0)
208timeZone :: TimeZone -> Builder
208timeZone :: TimeZone -> Builder
209timeZone (TimeZone off _ _)
209timeZone (TimeZone off _ _)
210 | off == 0 = B.char7 'Z'
210 | off == 0 = B.char7 'Z'
211− | otherwise = BP.primBounded (ascii5 (s,(hh,(hl,(mh,ml))))) ()
211+ | otherwise = BP.primBounded (ascii6 (s,(hh,(hl,(':',(mh,ml)))))) ()
212 where !s = if off < 0 then '-' else '+'
212 where !s = if off < 0 then '-' else '+'
213 !(T hh hl) = twoDigits h
213 !(T hh hl) = twoDigits h
214 !(T mh ml) = twoDigits m
214 !(T mh ml) = twoDigits m