Commit before making terminals there own entities

2022-06-06 11:17:11 +01:00
parent 384a16851b
commit 8e9f33d038
6 changed files with 56 additions and 37 deletions
@@ -166,11 +166,11 @@ updateTerminalLine w = case w ^? hud . hudElement . subInventory . termParams .
    Just (TerminalLineEffect _ eff) -> w
        & pointTermParams . termFutureLines %~ tail
        & eff (_subInventory . _hudElement $ _hud w)
-    Just (TerminalLineInput _ scrollc writec) -> w & pointTermParams %~
+    Just (TerminalLineInput _) -> w & pointTermParams %~
        ( ( termFutureLines %~ tail )
-        . ( termInput ?~ T.empty )
-        . ( termScrollCommands .~ scrollc )
-        . ( termWriteCommands .~ writec ) )
+--        . ( termScrollCommands .~ scrollc )
+--        . ( termWriteCommands .~ writec )
+        . ( termInput ?~ T.empty ) )
  where
    pointTermParams = hud . hudElement . subInventory . termParams