dillonkearns/elm-pages-v3-beta
1
1
Fork 0
mirror of https://github.com/dillonkearns/elm-pages-v3-beta.git synced 2024-11-23 22:26:16 +03:00
Code Issues Packages Projects Releases Wiki Activity

Rename type.

Browse Source
This commit is contained in:
Dillon Kearns 2022-08-24 20:12:26 -07:00
parent 41e4428bf4
commit 82b2f358fa
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
examples/todos/app/Route/Login.elm
View File

@ -302,7 +302,7 @@ allForms =
logoutForm
|> Form.toServerForm
|> Form.initCombinedServer (\_ -> Logout)
|> Form.combineServer LI form
|> Form.combineServer LogIn form
action : RouteParams -> Request.Parser (DataSource (Response ActionData ErrorPage))
@ -341,7 +341,7 @@ action routeParams =
)
|> DataSource.succeed
Ok ( _, LI emailAddress ) ->
Ok ( _, LogIn emailAddress ) ->
( okSession
, { maybeError = Nothing
, sentLink = True
@ -354,7 +354,7 @@ action routeParams =
type Action
= LI EmailAddress
= LogIn EmailAddress
| Logout