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

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
                    ]