print -> BS8.putStrLn

1 files changed, 1 insertions, 1 deletions

diff --git a/news.hs b/news.hs
index 7004398..bfcb5a1 100644
--- a/news.hs
+++ b/news.hs
@@ -67,7 +67,7 @@ main = do
                     let link = ni_link item in
                     link `Bloom.notElem` bloom
                 ) items
-        mapM_ print (map (\item ->
+        mapM_ BS8.putStrLn (map (\item ->
                 let title = ni_title item
                     link = ni_link item
                 in title <> " " <> link