X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=time-http.git;a=blobdiff_plain;f=Data%2FTime%2FRFC822.hs;h=c31c2448de6c2914938daa1c5ea1ed436938271c;hp=fa4f8efe7d532046dae63901884f54110f43751a;hb=c889f6f399e0e3c8bf6327323bbb838e06c9b7f9;hpb=01d923fe509a76afa27efdc7370438c5d4900492

diff --git a/Data/Time/RFC822.hs b/Data/Time/RFC822.hs
index fa4f8ef..c31c244 100644
--- 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