@@ -20,9 +20,8 @@ guest e = do
2020 leftmost [show <$> e, show <$> ticks]
2121 return $ VtyResult
2222 { _vtyResult_picture = picture
23− , _vtyResult_refresh = never
2423 , _vtyResult_shutdown = shutdown
2524 }
2625
2726main :: IO ()
28−main = host guest
27+main = runVtyApp guest