Add sounds, move data types out into separate folders
This commit is contained in:
@@ -94,7 +94,7 @@ accessTerminal mtmid w = case mtmid of
|
||||
TerminalReady -> tm
|
||||
TerminalBusy -> tm
|
||||
TerminalOff -> tm
|
||||
& tmFutureLines .~ _tmProgram tm tm w
|
||||
& tmFutureLines .~ _tmBootProgram tm tm w
|
||||
& tmStatus .~ TerminalBusy
|
||||
|
||||
simpleTermMessage :: [String] -> Terminal
|
||||
|
||||
Reference in New Issue
Block a user