Add synopsis to package page

This commit is contained in:
Chris Done 2014-12-14 20:41:17 +01:00
parent 8d056968d0
commit f7dde0a8e0
2 changed files with 4 additions and 1 deletions

View File

@ -89,7 +89,8 @@ getPackageR pn = do
then "You liked this!"
else "I like this!" :: Text
let deps = enumerate (metadataDeps metadata)
let synopsis = metadataSynopsis metadata
deps = enumerate (metadataDeps metadata)
revdeps = enumerate revdeps'
authors = enumerate (parseIdentitiesLiberally (metadataAuthor metadata))
maintainers = let ms = enumerate (parseIdentitiesLiberally (metadataMaintainer metadata))

View File

@ -6,6 +6,8 @@ $newline never
#{pn} #
<span .latest-version>
#{metadataVersion metadata} #
<p .synopsis>
#{synopsis}
$forall (i,(version, title, slug, hasHaddocks)) <- packages
$if i /= 0
, #