summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'src/roster-editor/src/Update')
-rw-r--r-- | src/roster-editor/src/Update/GoToMainMenu.elm | 4 | ||||
-rw-r--r-- | src/roster-editor/src/Update/HandleServerReply.elm | 14 | ||||
-rw-r--r-- | src/roster-editor/src/Update/ToggleBattleIndex.elm | 4 |
3 files changed, 11 insertions, 11 deletions
diff --git a/src/roster-editor/src/Update/GoToMainMenu.elm b/src/roster-editor/src/Update/GoToMainMenu.elm index a0471f2..3819fd9 100644 --- a/src/roster-editor/src/Update/GoToMainMenu.elm +++ b/src/roster-editor/src/Update/GoToMainMenu.elm @@ -1,7 +1,7 @@ module Update.GoToMainMenu exposing (apply_to) -- Shared ---------------------------------------------------------------------- -import Action.Ports +import Shared.Action.Ports -- Local Module ---------------------------------------------------------------- import Constants.IO @@ -20,5 +20,5 @@ apply_to : Struct.Model.Type -> (Struct.Model.Type, (Cmd Struct.Event.Type)) apply_to model = ( model, - (Action.Ports.go_to (Constants.IO.base_url ++"/main-menu/")) + (Shared.Action.Ports.go_to (Constants.IO.base_url ++"/main-menu/")) ) diff --git a/src/roster-editor/src/Update/HandleServerReply.elm b/src/roster-editor/src/Update/HandleServerReply.elm index f456355..c85c44d 100644 --- a/src/roster-editor/src/Update/HandleServerReply.elm +++ b/src/roster-editor/src/Update/HandleServerReply.elm @@ -8,11 +8,11 @@ import Http import Url -- Shared ---------------------------------------------------------------------- -import Action.Ports +import Shared.Action.Ports -import Struct.Flags +import Shared.Struct.Flags -import Util.Http +import Shared.Util.Http -- Battle Characters ----------------------------------------------------------- import BattleCharacters.Struct.DataSetItem @@ -43,7 +43,7 @@ disconnected current_state = ( model, [ - (Action.Ports.go_to + (Shared.Action.Ports.go_to ( Constants.IO.base_url ++ "/login/?action=disconnect&goto=" @@ -51,7 +51,7 @@ disconnected current_state = (Url.percentEncode ( "/roster-editor/?" - ++ (Struct.Flags.get_parameters_as_url model.flags) + ++ (Shared.Struct.Flags.get_parameters_as_url model.flags) ) ) ) @@ -69,7 +69,7 @@ goto url current_state = ( model, [ - (Action.Ports.go_to (Constants.IO.base_url ++ "/" ++ url)) + (Shared.Action.Ports.go_to (Constants.IO.base_url ++ "/" ++ url)) ] ) @@ -155,7 +155,7 @@ apply_to model query_result = (Struct.Model.invalidate (Struct.Error.new Struct.Error.Networking - (Util.Http.error_to_string error) + (Shared.Util.Http.error_to_string error) ) model ), diff --git a/src/roster-editor/src/Update/ToggleBattleIndex.elm b/src/roster-editor/src/Update/ToggleBattleIndex.elm index 27a61c3..81a9313 100644 --- a/src/roster-editor/src/Update/ToggleBattleIndex.elm +++ b/src/roster-editor/src/Update/ToggleBattleIndex.elm @@ -4,7 +4,7 @@ module Update.ToggleBattleIndex exposing (apply_to) import Array -- Shared ---------------------------------------------------------------------- -import Util.Array +import Shared.Util.Array -- Local Module ---------------------------------------------------------------- import Struct.Character @@ -44,7 +44,7 @@ give_battle_index : ( Struct.Model.Type ) give_battle_index model char index = - case (Util.Array.indexed_search (\e -> (e == -1)) model.battle_order) of + case (Shared.Util.Array.indexed_search (\e -> (e == -1)) model.battle_order) of Nothing -> model (Just (battle_index, _)) -> {model | |