Reify press plates

2022-07-23 22:21:13 +01:00
parent 5de837c8cf
commit 262ac237cd
6 changed files with 43 additions and 15 deletions
@@ -103,7 +103,7 @@ defaultPP = PressPlate
    { _ppPict = setDepth 1 . color (dim . dim $ bright blue) $ circleSolid 5
    , _ppPos = V2 0 0
    , _ppRot = 0
-    , _ppEvent = const id
+    , _ppEvent = PressPlateId
    , _ppID = -1
    , _ppText = "Pressure plate"
    }