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

remove "default" cw

Browse source
This commit is contained in:
rhiannon morris 2024-08-05 19:20:01 +02:00
parent 9c3182454d
commit ff906f8b5e
1 changed files with 1 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
make-pages/SinglePage.hs
View file

@ -72,14 +72,7 @@ make' root siteName prefix nsfw _dataDir dir
</figcaption> </figcaption>
|] |]
let defWarning = [b| let warning' = ifJust image0.warning makeWarning
i forgot to add a cw, sorry! <br>
if you can let me know i'd appreciate it
|]
let warning'
| Just w <- image0.warning = makeWarning w
| image0.nsfw = makeWarning defWarning
| otherwise = mempty
let warningT = makeWarning [b|.|] let warningT = makeWarning [b|.|]
let bgStyle = case bg of let bgStyle = case bg of