Refactor terminal prompt/maxlines into terminaltype

This commit is contained in:
2024-11-06 11:16:35 +00:00
parent 6168bf282e
commit bfd4649e1b
7 changed files with 39 additions and 27 deletions
+1 -2
View File
@@ -15,7 +15,6 @@ defaultTerminal =
, _tmName = "TESTTERMINAL"
, _tmDisplayedLines = []
, _tmFutureLines = []
, _tmMaxLines = 14
, _tmTitle = "TERMINAL IN LOCATION"
, _tmInput = defaultTerminalInput
, _tmScrollCommands = []
@@ -25,7 +24,7 @@ defaultTerminal =
, _tmCommandHistory = []
, _tmToggles = mempty
, _tmPartialCommand = Nothing
, _tmPromptString = "$ "
, _tmType = DefaultTerminal
}
defaultTerminalInput :: TerminalInput