From be5d10b6fdd4f1251d778e09523deb1ff0016953 Mon Sep 17 00:00:00 2001
From: Jonathan Lamothe <jlamothe1980@gmail.com>
Date: Sat, 7 Sep 2019 11:33:03 -0400
Subject: [PATCH] moved ProgMode

---
 src/Mtlstats/Types.hs | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/src/Mtlstats/Types.hs b/src/Mtlstats/Types.hs
index 9bda181..cf29ee4 100644
--- a/src/Mtlstats/Types.hs
+++ b/src/Mtlstats/Types.hs
@@ -26,8 +26,8 @@ module Mtlstats.Types (
   Controller (..),
   Action,
   ProgState (..),
-  GameState (..),
   ProgMode (..),
+  GameState (..),
   GameType (..),
   Database (..),
   Player (..),
@@ -152,6 +152,13 @@ data ProgState = ProgState
   -- ^ Buffer for user input
   } deriving (Eq, Show)
 
+-- | The program mode
+data ProgMode
+  = MainMenu
+  | NewSeason
+  | NewGame GameState
+  deriving (Eq, Show)
+
 -- | The game state
 data GameState = GameState
   { _gameYear     :: Maybe Int
@@ -174,13 +181,6 @@ data GameState = GameState
   -- ^ Set to 'True' when the user confirms the entered data
   } deriving (Eq, Show)
 
--- | The program mode
-data ProgMode
-  = MainMenu
-  | NewSeason
-  | NewGame GameState
-  deriving (Eq, Show)
-
 -- | The type of game
 data GameType
   = HomeGame