rhi/gallery
1
0
Fork 0
Code Issues 5 Pull requests 1 Releases Wiki Activity

add gallery description

Browse source
This commit is contained in:
Rhiannon Morris 2020-07-19 18:00:39 +02:00
parent c10a3ab340
commit c2f991bc3e
2 changed files with 7 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

4
make-pages/IndexPage.hs
View file

@ -50,8 +50,8 @@ make' (IndexInfo {title, galleries, links, footer}) = [b|@0
|]
makeItem :: GalleryInfo -> Builder
makeItem (GalleryInfo {title, prefix, filters}) = [b|@4
<li$nsfw><a href=$@prefix>$*title</a>
makeItem (GalleryInfo {title, description, prefix, filters}) = [b|@4
<li$nsfw><a href=$@prefix title="$*description">$*title</a>
|]
where nsfw = if hasNsfw filters then " class=nsfw" else ""