From 24cc7d8428e15e733cb031af04772cc4527ce06f Mon Sep 17 00:00:00 2001
From: Michael Snoyman <michael@snoyman.com>
Date: Fri, 5 Dec 2014 09:26:15 +0200
Subject: [PATCH] Use parseParas instead of parseString

---
 Data/Hackage.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Data/Hackage.hs b/Data/Hackage.hs
index afc059b..131fb05 100644
--- a/Data/Hackage.hs
+++ b/Data/Hackage.hs
@@ -281,7 +281,7 @@ getMetadata name version hash' gpd = do
             , metadataTestSuites = length $ PD.testSuites pd
             , metadataBenchmarks = length $ PD.benchmarks pd
             , metadataReadme = collapseHtml $ fromMaybe
-                (hToHtml . Haddock.toRegular . Haddock.parseString $ PD.description pd)
+                (hToHtml . Haddock.toRegular . Haddock.parseParas $ PD.description pd)
                 mreadme
             , metadataChangelog = collapseHtml <$> mchangelog
             , metadataLicenseContent = collapseHtml <$> mlicenseContent