jtdaugherty/brick
1
1
Fork 0
mirror of https://github.com/jtdaugherty/brick.git synced 2024-07-15 03:20:29 +03:00
Code Issues Projects Releases Wiki Activity

brick-fill-demo: improve UI

Browse Source
This commit is contained in:
Jonathan Daugherty 2022-09-21 13:46:40 -07:00
parent c527366347
commit 5fe19ab046
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
programs/FillDemo.hs
View File

@ -4,11 +4,12 @@ import Brick
import Brick.Widgets.Border
ui :: Widget ()
ui = vBox [ vLimitPercent 20 $ vBox [ str "This text is at the top."
ui = vBox [ vLimitPercent 20 $ vBox [ str "This text is in the top 20% of the window due to a fill and vLimitPercent."
, fill ' '
, hBorder
]
, str "This text is at the bottom."
, str "This text is at the bottom with another fill beneath it."
, fill 'x'
]
main :: IO ()