summaryrefslogtreecommitdiff
path: root/elm/UList/VNPage.elm
diff options
context:
space:
mode:
Diffstat (limited to 'elm/UList/VNPage.elm')
-rw-r--r--elm/UList/VNPage.elm4
1 files changed, 2 insertions, 2 deletions
diff --git a/elm/UList/VNPage.elm b/elm/UList/VNPage.elm
index 03fbaf6b..05d94ecf 100644
--- a/elm/UList/VNPage.elm
+++ b/elm/UList/VNPage.elm
@@ -74,12 +74,12 @@ update msg model =
Labels m -> let (nm, cmd) = LE.update m model.labels in ({ model | labels = nm}, Cmd.map Labels cmd)
Vote m -> let (nm, cmd) = VE.update m model.vote in ({ model | vote = nm}, Cmd.map Vote cmd)
- Add -> ({ model | state = Api.Loading }, Api.post "/u/ulist/add.json" (GAD.encode { uid = model.flags.uid, vid = model.flags.vid }) Added)
+ Add -> ({ model | state = Api.Loading }, GAD.send { uid = model.flags.uid, vid = model.flags.vid } Added)
Added GApi.Success -> ({ model | state = Api.Normal, onlist = True }, Cmd.none)
Added e -> ({ model | state = Api.Error e }, Cmd.none)
Del b -> ({ model | del = b }, Cmd.none)
- Delete -> ({ model | state = Api.Loading }, Api.post "/u/ulist/del.json" (GDE.encode { uid = model.flags.uid, vid = model.flags.vid }) Deleted)
+ Delete -> ({ model | state = Api.Loading }, GDE.send { uid = model.flags.uid, vid = model.flags.vid } Deleted)
Deleted GApi.Success -> ({ model | state = Api.Normal, onlist = False, del = False }, Cmd.none)
Deleted e -> ({ model | state = Api.Error e }, Cmd.none)