Continue work on terminals

2025-08-18 20:38:01 +01:00
parent 1c9d58c716
commit e7b66b4fa4
9 changed files with 145 additions and 119 deletions
@@ -47,7 +47,7 @@ addWarningTerminal str outplid =
            )
    termMessages trpl =
        lineOutputTerminal (makeColorTermLine red "WARNING" : makeTermPara str)
--            & tmCommands .:~ toggleCommand
+            & tmCommands .:~ TCToggles
            & tmToggles
                .~ M.fromList
                    [("DOOR", TerminalToggle (fromJust $ _plMID trpl) (BlConst True))]