mirror of
https://github.com/jtdaugherty/brick.git
synced 2024-11-22 14:10:03 +03:00
defaultMain: shut down Vty handle returned by customMainWithDefaultVty
This commit is contained in:
parent
d7565bc42f
commit
b8c7afc9e9
@ -131,8 +131,10 @@ defaultMain :: (Ord n)
|
||||
-> s
|
||||
-- ^ The initial application state.
|
||||
-> IO s
|
||||
defaultMain app st =
|
||||
fst <$> customMainWithDefaultVty Nothing app st
|
||||
defaultMain app st = do
|
||||
(s, vty) <- customMainWithDefaultVty Nothing app st
|
||||
shutdown vty
|
||||
return s
|
||||
|
||||
-- | A simple main entry point which takes a widget and renders it. This
|
||||
-- event loop terminates when the user presses any key, but terminal
|
||||
|
Loading…
Reference in New Issue
Block a user