summaryrefslogtreecommitdiff |
diff options
author | nsensfel <SpamShield0@noot-noot.org> | 2020-01-15 17:38:44 +0100 |
---|---|---|
committer | nsensfel <SpamShield0@noot-noot.org> | 2020-01-15 17:38:44 +0100 |
commit | 12f659fbee61be12c02167773f461b7e3fb8875b (patch) | |
tree | 0b1367d6573cf81953e0dd0e3ab453e48a444c38 /src/login | |
parent | 959e82eafece7d355b2ffdc2a6fec55afd6f35db (diff) |
...
Diffstat (limited to 'src/login')
-rw-r--r-- | src/login/src/Comm/SendRecovery.elm | 2 | ||||
-rw-r--r-- | src/login/src/Comm/SendSignIn.elm | 2 | ||||
-rw-r--r-- | src/login/src/Comm/SendSignUp.elm | 2 | ||||
-rw-r--r-- | src/login/src/ElmModule/Init.elm | 2 | ||||
-rw-r--r-- | src/login/src/Struct/Model.elm | 2 | ||||
-rw-r--r-- | src/login/src/Update/HandleConnected.elm | 2 |
6 files changed, 6 insertions, 6 deletions
diff --git a/src/login/src/Comm/SendRecovery.elm b/src/login/src/Comm/SendRecovery.elm index 31b89f3..18a64f4 100644 --- a/src/login/src/Comm/SendRecovery.elm +++ b/src/login/src/Comm/SendRecovery.elm @@ -36,5 +36,5 @@ try model = (Comm.Send.maybe_send model Constants.IO.login_recovery_handler - maybe_encod + maybe_encode ) diff --git a/src/login/src/Comm/SendSignIn.elm b/src/login/src/Comm/SendSignIn.elm index 4923751..0eb9c46 100644 --- a/src/login/src/Comm/SendSignIn.elm +++ b/src/login/src/Comm/SendSignIn.elm @@ -37,5 +37,5 @@ try model = (Comm.Send.maybe_send model Constants.IO.login_sign_in_handler - maybe_encod + maybe_encode ) diff --git a/src/login/src/Comm/SendSignUp.elm b/src/login/src/Comm/SendSignUp.elm index cefa0fe..6fc4ba4 100644 --- a/src/login/src/Comm/SendSignUp.elm +++ b/src/login/src/Comm/SendSignUp.elm @@ -38,5 +38,5 @@ try model = (Comm.Send.maybe_send model Constants.IO.login_sign_up_handler - maybe_encod + maybe_encode ) diff --git a/src/login/src/ElmModule/Init.elm b/src/login/src/ElmModule/Init.elm index e3ca64d..9574712 100644 --- a/src/login/src/ElmModule/Init.elm +++ b/src/login/src/ElmModule/Init.elm @@ -22,7 +22,7 @@ init flags = let new_model = (Struct.Model.new flags) in - case (Struct.Flags.maybe_get_param "action" flags) of + case (Struct.Flags.maybe_get_parameter "action" flags) of (Just "disconnect") -> (Update.Disconnect.apply_to new_model) _ -> if (flags.user_id == "") diff --git a/src/login/src/Struct/Model.elm b/src/login/src/Struct/Model.elm index 7d14239..3a721c1 100644 --- a/src/login/src/Struct/Model.elm +++ b/src/login/src/Struct/Model.elm @@ -45,7 +45,7 @@ type alias Type = new : Struct.Flags.Type -> Type new flags = let - maybe_mode = (Struct.Flags.maybe_get_param "mode" flags) + maybe_mode = (Struct.Flags.maybe_get_parameter "mode" flags) model = { help_request = Struct.HelpRequest.None, diff --git a/src/login/src/Update/HandleConnected.elm b/src/login/src/Update/HandleConnected.elm index 00843c7..15e3371 100644 --- a/src/login/src/Update/HandleConnected.elm +++ b/src/login/src/Update/HandleConnected.elm @@ -26,7 +26,7 @@ apply_to model = (Action.Ports.go_to (Constants.IO.base_url ++ ( - case (Struct.Flags.maybe_get_param "goto" model.flags) of + case (Struct.Flags.maybe_get_parameter "goto" model.flags) of Nothing -> "/main-menu/" (Just string) -> case (Url.percentDecode string) of |