diff --git a/Control/Logging.hs b/Control/Logging.hs
--- a/Control/Logging.hs
+++ b/Control/Logging.hs
@@ -101,7 +101,7 @@
 
 logTimeFormat :: IORef String
 {-# NOINLINE logTimeFormat #-}
-logTimeFormat = unsafePerformIO $ newIORef "%Y %b-%d %H:%M:%S%q"
+logTimeFormat = unsafePerformIO $ newIORef "%T"
 
 -- | Set the format used for log timestamps.
 setLogTimeFormat :: String -> IO ()
@@ -132,10 +132,7 @@
         when willLog $ do
             now <- getCurrentTime
             fmt <- readIORef logTimeFormat
-            let stamp' = formatTime defaultTimeLocale fmt now
-                -- stripping off the typically all-0 end of the 12-digit
-                -- picosecond section of the `formatTime` output
-                stamp = Prelude.take (Prelude.length stamp' - 6) stamp'
+            let stamp = formatTime defaultTimeLocale fmt now
             set <- readIORef logSet
             pushLogStr set
                 $ toLogStr (stamp ++ " " ++ renderLevel lvl
diff --git a/logging.cabal b/logging.cabal
--- a/logging.cabal
+++ b/logging.cabal
@@ -1,5 +1,5 @@
 Name:                logging
-Version:             3.0.4
+Version:             3.0.5
 Synopsis:            Simplified logging in IO for application writers.
 License-file:        LICENSE
 License:             MIT