On Complete check turn phase

mwunsch · Nov 1, 2016 · 172a7a5 · 172a7a5
1 parent 409c1d3
commit 172a7a5
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/Main.elm b/src/Main.elm
@@ -149,8 +149,8 @@ update msg game =
             let
                 updateGame : GameState
                 updateGame =
-                    case action of
-                        Action.Move ->
+                    case Turn.phase game.turn of
+                        Movement ->
                             if Gang.toList game.player.gang |> List.any (\m -> m.remainingMove > 0) then
                                 game
                             else