article_html <- readFile "test/fixtures/501317-article.html"
ioap <- parse $ parseHtml article_html
let article_page :: ArticlePage = fromJust $ ioap
article_html <- readFile "test/fixtures/501317-article.html"
ioap <- parse $ parseHtml article_html
let article_page :: ArticlePage = fromJust $ ioap