X-Git-Url: http://git.cielonegro.org/gitweb.cgi?a=blobdiff_plain;f=Data%2FTime%2FW3C%2FFormat.hs;h=f3f9fac77d1bb37e79ee8b8fe3e8a8c9c9ed8c19;hb=9b1ea615a387d121a581dc35d0e5bb91d8162811;hp=d83d8c3897eee78aa2d7a7a1b05561dd5db10543;hpb=fb743c0b822f29bac00c39e762ddd57dc65ee28f;p=time-w3c.git

diff --git a/Data/Time/W3C/Format.hs b/Data/Time/W3C/Format.hs
index d83d8c3..f3f9fac 100644
--- a/Data/Time/W3C/Format.hs
+++ b/Data/Time/W3C/Format.hs
@@ -47,7 +47,7 @@ format = format' . convert
                    , ":"
                    , case properFraction second :: (Int, Pico) of
                        (int, 0   ) -> show2 int
-                       (int, frac) -> show2 int ++ tail (show frac)
+                       (int, frac) -> show2 int ++ tail (showFixed True frac)
                    , showTZ tz
                    ]