Commit before changing TerminalCommand to produce [TerminalLine]
This commit is contained in:
@@ -145,8 +145,7 @@ displayTerminal tid cfig w = fromMaybe mempty $ do
|
||||
]
|
||||
where
|
||||
displayTermInput tp = case _tmInput tp of
|
||||
Nothing -> id
|
||||
Just (TerminalInput s inputstatus _)
|
||||
TerminalInput s inputstatus _
|
||||
-> (++ [('>':T.unpack s++displayBlinkCursor inputstatus,white)])
|
||||
displayBlinkCursor inputstatus | inputstatus = clockCycle 10 (V.fromList ["_",""]) w
|
||||
| otherwise = []
|
||||
|
||||
Reference in New Issue
Block a user