Add a missing haddock…

mrkkrp · Apr 13, 2017 · 9712a94 · 9712a94
1 parent 5b9cf5f
commit 9712a94
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/Codec/Audio/LAME.hs b/Codec/Audio/LAME.hs
@@ -308,6 +308,9 @@ ignoringIOErrors ioe = ioe `catch` handler
     handler :: IOError -> IO ()
     handler = const (return ())
 
+-- | Render track number and optionally total number of tracks as a strict
+-- 'Text' value.
+
 renderTrackNumber :: Word8 -> Maybe Word8 -> IO Text
 renderTrackNumber 0 t          = throwM (I.LameInvalidTrackNumber 0 t)
 renderTrackNumber n t@(Just 0) = throwM (I.LameInvalidTrackNumber n t)