diff --git a/little-logger.cabal b/little-logger.cabal
--- a/little-logger.cabal
+++ b/little-logger.cabal
@@ -4,10 +4,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: aba3bd1382858101a107dccd5d1945a8fd38e248c5f95f8ebfa7c9f8c01e72e5
+-- hash: b0fef8080b3eeaf20d63bd78a5dd95fd681c385a40581ee6fb4821e795a0da4d
 
 name:           little-logger
-version:        0.3.0
+version:        0.3.1
 synopsis:       Basic logging based on co-log
 description:    Please see the README on GitHub at <https://github.com/ejconlon/little-logger#readme>
 category:       Logging
diff --git a/src/LittleLogger/Common.hs b/src/LittleLogger/Common.hs
--- a/src/LittleLogger/Common.hs
+++ b/src/LittleLogger/Common.hs
@@ -7,6 +7,7 @@
   , defaultSimpleLogAction
   , filterActionSeverity
   , newSimpleLogAction
+  , runLogAction
   , runSimpleLogAction
   ) where
 
@@ -23,7 +24,10 @@
 newSimpleLogAction f = fmap (\run -> LogAction (run . f)) askRunInIO
 
 runSimpleLogAction :: MonadIO m => SimpleLogAction -> Message -> m ()
-runSimpleLogAction (LogAction actIO) = liftIO . actIO
+runSimpleLogAction = runLogAction
+
+runLogAction :: MonadIO m => LogAction IO msg -> msg -> m ()
+runLogAction (LogAction actIO) = liftIO . actIO
 
 defaultSimpleLogAction :: SimpleLogAction
 defaultSimpleLogAction = richMessageAction