mirror of
https://github.com/jtdaugherty/brick.git
synced 2024-09-11 15:55:54 +03:00
brick-fill-demo: improve UI
This commit is contained in:
parent
c527366347
commit
5fe19ab046
@ -4,11 +4,12 @@ import Brick
|
|||||||
import Brick.Widgets.Border
|
import Brick.Widgets.Border
|
||||||
|
|
||||||
ui :: Widget ()
|
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 ' '
|
, fill ' '
|
||||||
, hBorder
|
, hBorder
|
||||||
]
|
]
|
||||||
, str "This text is at the bottom."
|
, str "This text is at the bottom with another fill beneath it."
|
||||||
|
, fill 'x'
|
||||||
]
|
]
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
|
Loading…
Reference in New Issue
Block a user