module Parser.Detail
  ( parseDetail
  ) where

import Text.HTML.TagSoup

import Model.Detail

import Parser.Utils

parseDetail :: String -> Detail
parseDetail page =
  let tags = parseTags page
      description = getTagText "<div class=content>" tags
  in  Detail { description = description }