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

got tags backwards

Browse source
This commit is contained in:
Rhiannon Morris 2020-07-17 16:00:55 +02:00
parent 602277f7e6
commit aff4b7d89e
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
make-pages/SinglePage.hs
View file

@ -172,7 +172,7 @@ makeTags nsfw sfwTags nsfwTags =
where where
tagList = map makeTag tags tagList = map makeTag tags
makeTag t = [b|<li>$*t|] makeTag t = [b|<li>$*t|]
tags = List.nub $ if nsfw then sfwTags else sfwTags <> nsfwTags tags = List.nub $ if nsfw then sfwTags <> nsfwTags else sfwTags
extLinks :: Bool -> [Link] -> Builder extLinks :: Bool -> [Link] -> Builder
extLinks nsfw allLinks = extLinks nsfw allLinks =