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

Add synopsis to package page

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Handler/Package.hs
View File

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

2
templates/package.hamlet
View File

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