haskell/stackage-server
1
0
Fork 0
mirror of https://github.com/commercialhaskell/stackage-server.git synced 2026-01-27 19:30:25 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

Use parseParas instead of parseString

Browse Source
This commit is contained in:
Michael Snoyman 2014-12-05 09:26:15 +02:00
parent 685eaec533
commit 24cc7d8428
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Data/Hackage.hs
View File

@ -281,7 +281,7 @@ getMetadata name version hash' gpd = do
, metadataTestSuites = length $ PD.testSuites pd , metadataTestSuites = length $ PD.testSuites pd
, metadataBenchmarks = length $ PD.benchmarks pd , metadataBenchmarks = length $ PD.benchmarks pd
, metadataReadme = collapseHtml $ fromMaybe , metadataReadme = collapseHtml $ fromMaybe
(hToHtml . Haddock.toRegular . Haddock.parseString $ PD.description pd) (hToHtml . Haddock.toRegular . Haddock.parseParas $ PD.description pd)
mreadme mreadme
, metadataChangelog = collapseHtml <$> mchangelog , metadataChangelog = collapseHtml <$> mchangelog
, metadataLicenseContent = collapseHtml <$> mlicenseContent , metadataLicenseContent = collapseHtml <$> mlicenseContent