Splits client and server into two repositories.

1 files changed, 0 insertions, 37 deletions

diff --git a/client/elm/battlemap/src/Update/DirectionRequest.elm b/client/elm/battlemap/src/Update/DirectionRequest.elm
deleted file mode 100644
index da32240..0000000
--- a/client/elm/battlemap/src/Update/DirectionRequest.elm
+++ /dev/null
@@ -1,37 +0,0 @@
-module Update.DirectionRequest exposing (apply_to)
-
-import Dict
-
-import Battlemap.Direction
-import Battlemap.Navigator.Move
-
-import Model
-import Error
-
-make_it_so : Model.Type -> Battlemap.Direction.Type -> Model.Type
-make_it_so model dir =
-   case model.selection of
-      Nothing -> {model | state = (Model.Error Error.Programming)}
-      (Just selection) ->
-         let
-            (new_bmap, new_nav) =
-               (Battlemap.Navigator.Move.to
-                  model.battlemap
-                  selection.navigator
-                  dir
-                  (Dict.values model.characters)
-               )
-         in
-            {model |
-               state = Model.MovingCharacterWithButtons,
-               battlemap = new_bmap,
-               selection = (Just {selection | navigator = new_nav})
-            }
-
-
-apply_to : Model.Type -> Battlemap.Direction.Type -> Model.Type
-apply_to model dir =
-   case model.state of
-      Model.MovingCharacterWithButtons -> (make_it_so model dir)
-      Model.MovingCharacterWithClick -> (make_it_so model dir)
-      _ -> {model | state = (Model.Error Error.IllegalAction)}