diff --git a/src/Network/Wai/EventSource.hs b/src/Network/Wai/EventSource.hs
--- a/src/Network/Wai/EventSource.hs
+++ b/src/Network/Wai/EventSource.hs
@@ -3,7 +3,8 @@
     ServerEvent(..),
     eventSourceAppChan,
     eventSourceAppSource,
-    eventSourceAppIO
+    eventSourceAppIO,
+    sourceToSource
     ) where
 
 import           Blaze.ByteString.Builder (Builder)
@@ -59,6 +60,8 @@
             Just y -> C.StateOpen (Just C.Flush) (C.Chunk y)
     pull (Just x) = return $ C.StateOpen Nothing x
 
+-- | Convert a ServerEvent source into a Builder source of serialized
+-- events.
 sourceToSource :: Monad m => C.Source m ServerEvent -> C.Source m (C.Flush Builder)
 sourceToSource src = src $= CL.concatMap eventToFlushBuilder
   where
diff --git a/wai-eventsource.cabal b/wai-eventsource.cabal
--- a/wai-eventsource.cabal
+++ b/wai-eventsource.cabal
@@ -1,5 +1,5 @@
 Name:                wai-eventsource
-Version:             1.2.0.2
+Version:             1.2.0.3
 Synopsis:            WAI support for server-sent events
 Description:         WAI support for server-sent events
 License:             MIT