Partially successful change of terminals to external entities

2022-06-06 12:49:14 +01:00
parent 597336499c
commit eb38874102
12 changed files with 141 additions and 167 deletions
@@ -52,7 +52,7 @@ analyser
 analyser starts sucs fails afters upf pslight psmc = extTrigLitPos pslight $ \tp ->
    Just $ plSpot .~ psmc $ putTerminal' aquamarine tparams (termupdate tp)
  where
-    tparams = const $ defaultTermParams & termFutureLines ++.~ 
+    tparams = const $ defaultTermParams & tmFutureLines ++.~ 
        (map makeTermLine starts ++ [makeTermLine sucs] ++ map makeTermLine afters)
    termupdate tp btid = 
        (\mc -> upf mc . (triggers . ix (fromJust $ _plMID tp) .~ const (_sensToggle $ _mcSensor mc))