module Main where
import Internal.GridTabularList
import Brick.Widgets.TabularList.Grid
main :: IO ()
main = do
let msgs = [ "Press Up arrow to go up one item"
, "Press Down arrow to go down one item"
, "Press PageUp to go up one page"
, "Press PageDown to go down one page"
, "Press Home to go to the beginning"
, "Press End to go to the end"
, " "
, "Press Left arrow to go left by one column"
, "Press Right arrow to go right by one column"
, "Press Ctrl+Home to go to the first column"
, "Press Ctrl+End to go to the last column"
, "Press Ctrl+PageUp to go left one page of columns"
, "Press Ctrl+PageDown to go right one page of columns" ]
runMain msgs handleGridListEvent