From 2d5c4e64712b2b41a8f35b9c7359d84e39894243 Mon Sep 17 00:00:00 2001 From: Jonathan Lamothe Date: Tue, 30 May 2023 19:01:30 -0400 Subject: [PATCH] fixed spacing on title screen --- src/Mtlstats/Control/TitleScreen.hs | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/src/Mtlstats/Control/TitleScreen.hs b/src/Mtlstats/Control/TitleScreen.hs index 23e5bfc..f727add 100644 --- a/src/Mtlstats/Control/TitleScreen.hs +++ b/src/Mtlstats/Control/TitleScreen.hs @@ -24,18 +24,17 @@ along with this program. If not, see . module Mtlstats.Control.TitleScreen (titleScreenC) where import Brick.Types (BrickEvent (VtyEvent)) -import Brick.Widgets.Center (hCenter) -import Brick.Widgets.Core (str, vBox) import Control.Monad.State.Class (modify) import Data.Char (chr) import Graphics.Vty.Input.Events (Event (EvKey)) import Mtlstats.Actions import Mtlstats.Types +import Mtlstats.Util titleScreenC :: Controller titleScreenC = Controller - { drawController = const $ vBox $ map (hCenter . str) + { drawController = const $ linesToWidgetC $ [ "" , "MONTREAL CANADIENS STATISTICS" ]