| summaryrefslogtreecommitdiff |
diff options
| author | Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org> | 2020-05-24 15:11:06 +0200 |
|---|---|---|
| committer | Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org> | 2020-05-24 15:11:06 +0200 |
| commit | 39f0b6b796b44d4c79ecea00d3bdf950e2c44e51 (patch) | |
| tree | 42c9f3f3d227e98ad3ba9a6ab589371afc8a0da7 /src/login/src/Struct | |
| parent | b61d70864de7e4a39196e06aaa7630c445e322c0 (diff) | |
It compiles again. The battle module is clearly broken, though...
Diffstat (limited to 'src/login/src/Struct')
| -rw-r--r-- | src/login/src/Struct/Event.elm | 3 | ||||
| -rw-r--r-- | src/login/src/Struct/Model.elm | 10 |
2 files changed, 5 insertions, 8 deletions
diff --git a/src/login/src/Struct/Event.elm b/src/login/src/Struct/Event.elm index faa4a2f..1c7085c 100644 --- a/src/login/src/Struct/Event.elm +++ b/src/login/src/Struct/Event.elm @@ -3,9 +3,6 @@ module Struct.Event exposing (Type(..), attempted) -- Elm ------------------------------------------------------------------------- import Http --- Shared ---------------------------------------------------------------------- -import Util.Http - -- Login ----------------------------------------------------------------------- import Struct.Error import Struct.ServerReply diff --git a/src/login/src/Struct/Model.elm b/src/login/src/Struct/Model.elm index 3a721c1..4cb2288 100644 --- a/src/login/src/Struct/Model.elm +++ b/src/login/src/Struct/Model.elm @@ -10,9 +10,9 @@ module Struct.Model exposing -- Elm ------------------------------------------------------------------------- -- Shared ---------------------------------------------------------------------- -import Struct.Flags +import Shared.Struct.Flags --- Login ----------------------------------------------------------------------- +-- Local Module ---------------------------------------------------------------- import Struct.Error import Struct.HelpRequest import Struct.UI @@ -24,7 +24,7 @@ type alias Type = { help_request: Struct.HelpRequest.Type, error: (Maybe Struct.Error.Type), - flags: Struct.Flags.Type, + flags: Shared.Struct.Flags.Type, username: String, password1: String, password2: String, @@ -42,10 +42,10 @@ type alias Type = -------------------------------------------------------------------------------- -- EXPORTED -------------------------------------------------------------------- -------------------------------------------------------------------------------- -new : Struct.Flags.Type -> Type +new : Shared.Struct.Flags.Type -> Type new flags = let - maybe_mode = (Struct.Flags.maybe_get_parameter "mode" flags) + maybe_mode = (Shared.Struct.Flags.maybe_get_parameter "mode" flags) model = { help_request = Struct.HelpRequest.None, |