cerchez07/elm-0.19-workshop
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix finished Profile page

Browse Source
This commit is contained in:
Richard Feldman
2018-05-05 04:54:28 -04:00
parent 3f36c52254
commit f6bef58e3d
1 changed files with 6 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

37
finished/src/Page/Profile.elm
View File

@@ -133,37 +133,12 @@ update session msg model =
)
Just user ->
let
-- TODO
-- 1) head over to the Request.Profile module and look up
-- what arguments the `toggleFollow` function takes.
--
-- 2) call Request.Profile.toggleFollow here,
-- to get back a Request.
--
-- 3) pass that Request to Http.send to get a Cmd.
-- Use that Cmd here.
--
-- Here's the documentation for Http.send:
-- http://package.elm-lang.org/packages/elm-lang/http/1.0.0/Http#send
--
-- Here are some hepful values that are in scope:
--
-- user.token : Maybe AuthToken
--
-- profile : Profile [look in the Data.Profile module!]
--
-- FollowCompleted : Result Http.Error Profile -> Msg
--
cmd : Cmd Msg
cmd =
Request.Profile.toggleFollow
profile.username
profile.following
user.token
|> Http.send FollowCompleted
in
( model, cmd )
user.token
|> Request.Profile.toggleFollow
profile.username
profile.following
|> Http.send FollowCompleted
|> pair model
FollowCompleted (Ok newProfile) ->
( { model | profile = newProfile }, Cmd.none )