Half add explicit death event for machines

2022-06-05 10:37:40 +01:00
parent 7398791194
commit fcc6d3952c
9 changed files with 26 additions and 10 deletions
@@ -96,7 +96,7 @@ addButtonSlowDoor x h rm = do
        & rmPmnts .++~ [butDoor , theterminal]
        & rmBound .:~ openDoorBound
  where
-    theterminal = putTerminal (simpleTermMessage themessage)
+    theterminal = putTerminal terminalColor (simpleTermMessage themessage)
        & plSpot .~ rprBoolShift (isUnusedLnkType InLink) (shiftByV2 (V2 0 (-10)))
    themessage = 
        ["WARNING:"