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

Swap part1 and part2

Browse Source
This commit is contained in:
Richard Feldman
2018-08-13 05:04:35 -04:00
parent 353623f108
commit 493b5681d4
16 changed files with 156 additions and 156 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
advanced/part2/src/Viewer.elm
View File

@@ -55,7 +55,7 @@ encode : Viewer -> Value
encode (Viewer info) =
Encode.object
[ ( "email", Email.encode info.email )
, ( "username", Username.encode info.cred.username )
, ( "username", Username.encode (Cred.username info.cred) )
, ( "bio", Maybe.withDefault Encode.null (Maybe.map Encode.string (Profile.bio info.profile)) )
, ( "image", Avatar.encode (Profile.avatar info.profile) )
, ( "token", Cred.encodeToken info.cred )