diff --git a/heavy-logger.cabal b/heavy-logger.cabal
--- a/heavy-logger.cabal
+++ b/heavy-logger.cabal
@@ -1,5 +1,5 @@
 name:                heavy-logger
-version:             0.3.2.0
+version:             0.3.2.1
 synopsis:            Full-weight logging based on fast-logger
 description:         This is Haskell logging library, which prefers functionality and extendability
                      over light weight and simplicity. It can use fast-logger as backend, and is compatible 
diff --git a/src/System/Log/Heavy/Format.hs b/src/System/Log/Heavy/Format.hs
--- a/src/System/Log/Heavy/Format.hs
+++ b/src/System/Log/Heavy/Format.hs
@@ -35,8 +35,10 @@
 -- * Also all variables from context are available.
 --
 module System.Log.Heavy.Format
-  ( defaultLogFormat,
-    formatLogMessage
+  ( LogMessageWithTime (..),
+    defaultLogFormat,
+    formatLogMessage,
+    formatLogMessage'
   ) where
 
 import Control.Applicative
@@ -154,5 +156,9 @@
 
 -- | Format log message for output.
 formatLogMessage :: F.Format -> LogMessage -> FormattedTime -> LogStr
-formatLogMessage fmt msg ftime = toLogStr $ F.format fmt $ LogMessageWithTime ftime msg
+formatLogMessage fmt msg ftime = toLogStr $ formatLogMessage' fmt msg ftime
+
+-- | Format log message for output.
+formatLogMessage' :: F.Format -> LogMessage -> FormattedTime -> TL.Text
+formatLogMessage' fmt msg ftime = F.format fmt $ LogMessageWithTime ftime msg