@@ -87,7 +87,7 @@ mkVtyEscDelay escDelay = do
88intMkVty :: IO Event -> IO () -> TerminalHandle -> IO Vty
88intMkVty :: IO Event -> IO () -> TerminalHandle -> IO Vty
89intMkVty kvar fend t = do
89intMkVty kvar fend t = do
90− last_pic_ref <- newIORef undefined
90+ last_pic_ref <- newIORef Nothing
91 last_update_ref <- newIORef Nothing
91 last_update_ref <- newIORef Nothing
93 let inner_update in_pic = do
93 let inner_update in_pic = do