Add synopsis to package page

Handler/Package.hs

@@ -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))

templates/package.hamlet

@@ -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
                  , #