diff --git a/src/Codec/Binary/UTF8/Light.hs b/src/Codec/Binary/UTF8/Light.hs
--- a/src/Codec/Binary/UTF8/Light.hs
+++ b/src/Codec/Binary/UTF8/Light.hs
@@ -52,6 +52,7 @@
 import Data.Monoid(Monoid(..))
 import Data.ByteString(ByteString)
 import qualified Data.ByteString as B
+import qualified Data.ByteString.Char8 as B8
 import qualified Data.ByteString.Internal as B
 import Data.ByteString.Unsafe
 import System.IO(Handle)
@@ -122,13 +123,13 @@
 putUTF8 = flip withUTF8 B.putStr
 
 putUTF8Ln :: (UTF8 a) => a -> IO ()
-putUTF8Ln = flip withUTF8 B.putStrLn
+putUTF8Ln = flip withUTF8 B8.putStrLn
 
 hPutUTF8 :: (UTF8 a) => Handle -> a -> IO ()
 hPutUTF8 h = flip withUTF8 (B.hPut h)
 
 hPutUTF8Ln :: (UTF8 a) => Handle -> a -> IO ()
-hPutUTF8Ln h = flip withUTF8 (B.hPutStrLn h)
+hPutUTF8Ln h = flip withUTF8 (B8.hPutStrLn h)
 
 readUTF8File :: (UTF8 a) => FilePath -> IO a
 readUTF8File = (return . decode =<<) . B.readFile
diff --git a/utf8-light.cabal b/utf8-light.cabal
--- a/utf8-light.cabal
+++ b/utf8-light.cabal
@@ -1,5 +1,5 @@
 name:               utf8-light
-version:            0.4.1
+version:            0.4.2
 cabal-version:      >= 1.6
 build-type:         Simple
 license:            BSD3