Crush run-past room
This commit is contained in:
@@ -23,6 +23,7 @@ data ButtonEvent
|
||||
, _bsColor2 :: Color
|
||||
, _btOn :: Bool
|
||||
}
|
||||
| ButtonDumbSwitch { _bdsTrigger :: Int }
|
||||
| ButtonAccessTerminal {_btTermID :: Int}
|
||||
|
||||
data Button = Button
|
||||
|
||||
Reference in New Issue
Block a user