Reset color when handling interrupt

This commit is contained in:
Joshua Clayton 2016-05-15 16:18:24 -04:00
parent 2d65555b60
commit fde423f272

View File

@ -32,6 +32,7 @@ handleInterrupt :: ThreadId -> IO ()
handleInterrupt tid = do
resetScreen
showCursor
setSGR [Reset]
throwTo tid $ ExitFailure code
where
code = signalToInt $ 128 + keyboardSignal