diff --git a/make-pages/SinglePage.hs b/make-pages/SinglePage.hs index a6f5895..807ed91 100644 --- a/make-pages/SinglePage.hs +++ b/make-pages/SinglePage.hs @@ -38,18 +38,20 @@ make' includeNsfw (Info {date, title, tags, nsfwTags, buttonBar title' includeNsfw images <> "\n\n" <> "
\n" <> - " path0 <> "\">\n" <> + " path0 <> "\">\n\n" <> ifJust description (\d -> "
\n" <> "

description

\n" <> indent 4 d <> - "
\n") <> + " \n") <> "\n" <> makeTags includeNsfw tags nsfwTags <> extLinks includeNsfw links <> "
\n\n" <> - "\n" + "\n" where path0' = let Image {path} = head images in path path0 = fromText path0'