summaryrefslogtreecommitdiff
path: root/elm
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2020-05-17 08:11:24 +0200
committerYorhel <git@yorhel.nl>2020-05-17 08:11:24 +0200
commite6ab680e18052c8d2c015ff76c03edd55ae4fd4e (patch)
treec034176d22fef2796813c0ca91508b519c9f941d /elm
parent44e9457ee75fec838c471dc843182460a2cca2f8 (diff)
Add option to hide all images by default
Diffstat (limited to 'elm')
-rw-r--r--elm/User/Edit.elm6
1 files changed, 4 insertions, 2 deletions
diff --git a/elm/User/Edit.elm b/elm/User/Edit.elm
index fd4c2b74..c8ecdddb 100644
--- a/elm/User/Edit.elm
+++ b/elm/User/Edit.elm
@@ -236,12 +236,14 @@ view model =
[ b [ class "grayedout" ] [ text "The two options below are only used for character images at the moment, they will eventually replace the above checkbox and apply to all images on the site." ]
, br [] []
, inputSelect "" m.max_sexual (Prefs << MaxSexual) [style "width" "400px"]
- [ (0, "Hide sexually suggestive or explicit images")
+ [ (-1,"Hide all images")
+ , (0, "Hide sexually suggestive or explicit images")
, (1, "Hide only sexually explicit images")
, (2, "Don't hide suggestive or explicit images")
]
, br [] []
- , inputSelect "" m.max_violence (Prefs << MaxViolence) [style "width" "400px"]
+ , if m.max_sexual == -1 then text "" else
+ inputSelect "" m.max_violence (Prefs << MaxViolence) [style "width" "400px"]
[ (0, "Hide violent or brutal images")
, (1, "Hide only brutal images")
, (2, "Don't hide violent or brutal images")