From baf040deeac6cd245c38a273466e6479b004d58c Mon Sep 17 00:00:00 2001 From: Jonathan Lamothe Date: Wed, 15 Jan 2020 00:43:48 -0500 Subject: [PATCH] implemented editStandingsC --- src/Mtlstats/Control/EditStandings.hs | 9 ++++++++- src/Mtlstats/Menu/EditStandings.hs | 27 +++++++++++++++++++++++++++ 2 files changed, 35 insertions(+), 1 deletion(-) create mode 100644 src/Mtlstats/Menu/EditStandings.hs diff --git a/src/Mtlstats/Control/EditStandings.hs b/src/Mtlstats/Control/EditStandings.hs index d10789f..ce0a9c9 100644 --- a/src/Mtlstats/Control/EditStandings.hs +++ b/src/Mtlstats/Control/EditStandings.hs @@ -21,8 +21,15 @@ along with this program. If not, see . module Mtlstats.Control.EditStandings (editStandingsC) where +import qualified UI.NCurses as C + +import Mtlstats.Menu +import Mtlstats.Menu.EditStandings import Mtlstats.Types -- | Controller for the edit standings menu editStandingsC :: Controller -editStandingsC = undefined +editStandingsC = menuControllerWith header editStandingsMenu + +header :: ProgState -> C.Update () +header = undefined diff --git a/src/Mtlstats/Menu/EditStandings.hs b/src/Mtlstats/Menu/EditStandings.hs new file mode 100644 index 0000000..259102a --- /dev/null +++ b/src/Mtlstats/Menu/EditStandings.hs @@ -0,0 +1,27 @@ +{- | + +mtlstats +Copyright (C) 1984, 1985, 2019, 2020 Rhéal Lamothe + + +This program is free software: you can redistribute it and/or modify +it under the terms of the GNU General Public License as published by +the Free Software Foundation, either version 3 of the License, or (at +your option) any later version. + +This program is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +General Public License for more details. + +You should have received a copy of the GNU General Public License +along with this program. If not, see . + +-} + +module Mtlstats.Menu.EditStandings (editStandingsMenu) where + +import Mtlstats.Types.Menu + +editStandingsMenu :: Menu () +editStandingsMenu = undefined