Simplify terminals, move towards using tries for commands

2025-08-16 01:11:29 +01:00
parent e04d4fea31
commit 73cdf42e4a
12 changed files with 377 additions and 398 deletions
@@ -10,6 +10,6 @@ import Control.Lens
 termScreenColor :: Terminal -> Maybe Color
 termScreenColor tm = case tm ^. tmStatus of
    TerminalOff -> Nothing
-    TerminalTextInput _ -> Just green
+    TerminalTextInput _ _ -> Just green
    TerminalPressTo{} -> Just green
    TerminalBusy -> Just white