| summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'src/login/src/Comm/SendRecovery.elm')
| -rw-r--r-- | src/login/src/Comm/SendRecovery.elm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/login/src/Comm/SendRecovery.elm b/src/login/src/Comm/SendRecovery.elm index e9fd3a9..31b89f3 100644 --- a/src/login/src/Comm/SendRecovery.elm +++ b/src/login/src/Comm/SendRecovery.elm @@ -18,8 +18,8 @@ import Struct.Model -------------------------------------------------------------------------------- -- LOCAL ----------------------------------------------------------------------- -------------------------------------------------------------------------------- -try_encoding : Struct.Model.Type -> (Maybe Json.Encode.Value) -try_encoding model = +maybe_encode : Struct.Model.Type -> (Maybe Json.Encode.Value) +maybe_encode model = (Just (Json.Encode.object [ @@ -33,8 +33,8 @@ try_encoding model = -------------------------------------------------------------------------------- try : Struct.Model.Type -> (Maybe (Cmd Struct.Event.Type)) try model = - (Comm.Send.try_sending + (Comm.Send.maybe_send model Constants.IO.login_recovery_handler - try_encoding + maybe_encod ) |