mirror of
https://github.com/jtdaugherty/brick.git
synced 2024-11-22 14:10:03 +03:00
16 lines
371 B
Haskell
16 lines
371 B
Haskell
module Main where
|
|
|
|
import Brick
|
|
import Brick.Widgets.Border
|
|
|
|
ui :: Widget ()
|
|
ui = vBox [ vLimitPercent 20 $ vBox [ str "This text is at the top."
|
|
, fill ' '
|
|
, hBorder
|
|
]
|
|
, str "This text is at the bottom."
|
|
]
|
|
|
|
main :: IO ()
|
|
main = simpleMain ui
|