cosmetic changes

[time-http.git] / Data / Time / RFC822.hs

diff --git a/Data/Time/RFC822.hs b/Data/Time/RFC822.hs
index fa4f8efe7d532046dae63901884f54110f43751a..c31c2448de6c2914938daa1c5ea1ed436938271c 100644 (file)
--- a/Data/Time/RFC822.hs
+++ b/Data/Time/RFC822.hs
@@ -66,7 +66,7 @@ format zonedTime
                , ":"
                , show2 (floor (todSec timeOfDay))
                , " "
-               , showTZ timeZone
+               , show4digitsTZ timeZone
                ]
 
 parse :: String -> Maybe ZonedTime