summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2020-01-02 12:38:15 +0100
committerYorhel <git@yorhel.nl>2020-01-02 12:38:15 +0100
commita199dafbcef7f99db316db236f7bb03be4a42fc3 (patch)
tree6b0cdebf80b215548bf99bc98d7f9675d2d1e331
parentae9bf1610a43e1820393bb612f75b43a5662d268 (diff)
ulist: Fix bug in unsetting play status labels
-rw-r--r--elm/UList/LabelEdit.elm2
1 files changed, 1 insertions, 1 deletions
diff --git a/elm/UList/LabelEdit.elm b/elm/UList/LabelEdit.elm
index 6d0a4ea5..fa2c54a8 100644
--- a/elm/UList/LabelEdit.elm
+++ b/elm/UList/LabelEdit.elm
@@ -69,7 +69,7 @@ update msg model =
Api.post "/u/ulist/setlabel.json" (GLE.encode { uid = model.uid, vid = model.vid, label = l, applied = b }) (Saved l b)
-- Unselect other progress labels (1..4) when setting a progress label
:: if cascade
- then (List.map (\i -> selfCmd (Toggle i False False)) <| List.filter (\i -> i >= 0 && l <= 4 && i /= l) <| Set.toList model.tsel)
+ then (List.map (\i -> selfCmd (Toggle i False False)) <| List.filter (\i -> i >= 0 && i <= 4 && i /= l) <| Set.toList model.tsel)
else []
)