From 3d22bada02f2d10a2bde03813cca2445b3d36132 Mon Sep 17 00:00:00 2001 From: Yorhel Date: Thu, 2 Jan 2020 12:53:21 +0100 Subject: ulist: Aaargh Fix another bug with unsetting progress labels --- elm/UList/LabelEdit.elm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/elm/UList/LabelEdit.elm b/elm/UList/LabelEdit.elm index fa2c54a8..f1f14e0f 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 && i <= 4 && i /= l) <| Set.toList model.tsel) + then (List.map (\i -> selfCmd (Toggle i False False)) <| List.filter (\i -> l >= 0 && l <= 4 && i >= 0 && i <= 4 && i /= l) <| Set.toList model.tsel) else [] ) -- cgit v1.2.3