From: Michael Orlitzky <michael@orlitzky.com>
Date: Thu, 12 Jul 2012 20:31:48 +0000 (-0400)
Subject: Remove a debug putStrLn.
X-Git-Tag: v0.0.1~17
X-Git-Url: http://gitweb.michael.orlitzky.com/?p=dead%2Flwn-epub.git;a=commitdiff_plain;h=5ac7dd7f301ba633b38d7bf2361044d25204bb6e

Remove a debug putStrLn.
---

diff --git a/src/LWN/Page.hs b/src/LWN/Page.hs
index c61bf6a..49faa0b 100644
--- a/src/LWN/Page.hs
+++ b/src/LWN/Page.hs
@@ -261,8 +261,6 @@ ap_parse_articles xml = do
   parsed_byline   <- parse_byline xml
   parsed_body     <- ap_parse_body xml
 
-  putStrLn $ fromJust parsed_headline
-
   if (isNothing parsed_headline) || (isNothing parsed_body)
   then return []
   else do