moved editStandings to Mtlstats.Actions.EditStandings module

src/Mtlstats/Actions.hs

@@ -36,7 +36,6 @@ module Mtlstats.Actions
   , editSelectedPlayer
   , editGoalie
   , editSelectedGoalie
-  , editStandings
   , addPlayer
   , addGoalie
   , resetCreatePlayerState
@@ -158,10 +157,6 @@ editSelectedGoalie f s = fromMaybe s $ do
     goalies' = modifyNth n f goalies
   Just $ s & database.dbGoalies .~ goalies'
 
--- | Enters edit standings mode
-editStandings :: ProgState -> ProgState
-editStandings = progMode .~ EditStandings
-
 -- | Adds the entered player to the roster
 addPlayer :: ProgState -> ProgState
 addPlayer s = fromMaybe s $ do

src/Mtlstats/Actions/EditStandings.hs

@@ -20,12 +20,19 @@ along with this program.  If not, see <https://www.gnu.org/licenses/>.
 -}
 
 module Mtlstats.Actions.EditStandings
-  ( editHomeStandings
+  ( editStandings
+  , editHomeStandings
   , editRoadStandings
   ) where
 
+import Lens.Micro ((.~))
+
 import Mtlstats.Types
 
+-- | Enters edit standings mode
+editStandings :: ProgState -> ProgState
+editStandings = progMode .~ EditStandings
+
 -- | Edits the home standings
 editHomeStandings :: ProgState -> ProgState
 editHomeStandings = undefined

src/Mtlstats/Menu.hs

@@ -44,6 +44,7 @@ import qualified UI.NCurses as C
 
 import Mtlstats.Actions
 import qualified Mtlstats.Actions.NewGame.GoalieInput as GI
+import Mtlstats.Actions.EditStandings
 import Mtlstats.Config
 import Mtlstats.Types
 import Mtlstats.Types.Menu