From: Michael Orlitzky Date: Fri, 22 Jun 2012 21:06:11 +0000 (-0400) Subject: Add a dependency on tagsoup. X-Git-Tag: v0.0.1~56 X-Git-Url: https://gitweb.michael.orlitzky.com/?a=commitdiff_plain;h=8e5616a377196f0a200947173d4c78a3dca8a55f;p=dead%2Flwn-epub.git Add a dependency on tagsoup. Start throwing junk into Main. --- diff --git a/lwn-epub.cabal b/lwn-epub.cabal index 4c60779..3742244 100644 --- a/lwn-epub.cabal +++ b/lwn-epub.cabal @@ -9,7 +9,8 @@ build-type: Simple executable lwn-epub build-depends: - base == 4.5.* + base == 4.5.*, + tagsoup == 0.12.* main-is: Main.hs diff --git a/src/Main.hs b/src/Main.hs index da760e4..e91654d 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -1,6 +1,13 @@ module Main where +data Article = Article { headline :: String, + byline :: String, + body_html :: String } + deriving (Eq, Show) + +parse_article :: String -> String +parse_article _ = "" main :: IO () main = do