no button on the nsfw warning goes to crouton.net
This commit is contained in:
parent
f16c2f549a
commit
fd216ae3dd
3 changed files with 21 additions and 6 deletions
|
@ -7,7 +7,7 @@ data What = Single | Gallery
|
|||
|
||||
instance CanBuild What where
|
||||
build Single = "this art"
|
||||
build Gallery = "the art in this gallery"
|
||||
build Gallery = "some of the art in this gallery"
|
||||
|
||||
|
||||
script :: Maybe What -> Builder
|
||||
|
@ -34,7 +34,9 @@ dialog (Just what) = [b|@0
|
|||
|
||||
<div class=dialog-buttons>
|
||||
<button id=nsfw-yes class=yes>i am an adult</button>
|
||||
<button id=nsfw-no class=no>i am not</button>
|
||||
<a href=//crouton.net referrerpolicy=no-referrer>
|
||||
<button id=nsfw-no class=no>i am not</button>
|
||||
</a>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue