diff --git a/src/Abacus/App/Widgets.hs b/src/Abacus/App/Widgets.hs index b321af9..b9ab2c7 100644 --- a/src/Abacus/App/Widgets.hs +++ b/src/Abacus/App/Widgets.hs @@ -28,15 +28,12 @@ module Abacus.App.Widgets (abacusW) where import Brick ( Widget - , freezeBorders , hBox , hLimit , str , vBox - , withBorderStyle ) -import Brick.Widgets.Border (hBorder) -import Brick.Widgets.Border.Style (unicode, unicodeBold) +import Brick.Widgets.Border (border, hBorder) import Lens.Micro.Platform ((^.)) import Abacus @@ -47,10 +44,7 @@ import Abacus.App.Widgets.Internal abacusW :: AppState -> Widget () abacusW s = hBox [ abacusLeftW s - , withBorderStyle unicodeBold $ - freezeBorders $ - withBorderStyle unicode $ - beadsW $ s^.abacus + , border $ beadsW $ s^.abacus , abacusRightW s ]