Simplify analyser terminal
This commit is contained in:
@@ -62,6 +62,7 @@ accessTerminal tid w = fromMaybe w $ do
|
||||
TerminalTextInput{} -> tm
|
||||
TerminalLineRead -> tm
|
||||
TerminalPressTo{} -> tm
|
||||
TerminalWaiting{} -> tm
|
||||
TerminalOff ->
|
||||
tm
|
||||
& tmFutureLines .~ _tmBootLines tm
|
||||
|
||||
Reference in New Issue
Block a user