aboutsummaryrefslogtreecommitdiffhomepage
path: root/UI.hs
diff options
context:
space:
mode:
Diffstat (limited to 'UI.hs')
-rw-r--r--UI.hs14
1 files changed, 0 insertions, 14 deletions
diff --git a/UI.hs b/UI.hs
index 7de5f0e..084458f 100644
--- a/UI.hs
+++ b/UI.hs
@@ -23,35 +23,21 @@ along with sscan. If not, see <http://www.gnu.org/licenses/>.
module UI (runTheApp) where
-import Control.Concurrent (forkFinally)
-import Control.Monad (void)
-import Control.Monad.IO.Class (liftIO)
-import Data.Monoid
-import qualified Data.Text as T
import qualified Graphics.Vty as V
import Lens.Micro ((&), (.~), (^.))
-import System.Directory (getHomeDirectory,
- getTemporaryDirectory,
- removeDirectoryRecursive)
-import System.FilePath ((</>))
-import System.IO.Temp (createTempDirectory)
import Brick.AttrMap
import Brick.Main
-import Brick.Markup (markup, (@?))
import Brick.Types
-import Brick.Util (fg, on)
import Brick.Widgets.Border as B
import Brick.Widgets.Center as C
import Brick.Widgets.Core
-import Data.Text.Markup ((@@))
import Brick.Widgets.DefnList
import Presets
import Types.Preset
import Types.State
-
drawUI :: St -> [Widget ()]
drawUI st = [ui]
where