Tweak pillar room

2021-10-03 17:52:35 +01:00
parent 0c6fa80ce0
commit 2c5cdbdc73
8 changed files with 44 additions and 35 deletions
@@ -21,8 +21,9 @@ makeButton col eff = Button
    { _btPict = defaultDrawButton col
    , _btPos = V2 0 0
    , _btRot = 0
-    , _btEvent = \b w -> eff . over buttons (IM.adjust turnOn (_btID b))
-                                . soundFromGeneral (LeverSound 0) (btpos b) click1S Nothing $ w
+    , _btEvent = \b w -> eff 
+        . over buttons (IM.adjust turnOn (_btID b))
+        . soundFromGeneral (LeverSound 0) (btpos b) click1S Nothing $ w
    , _btID = 0
    , _btText = "Button"
    , _btState = BtOff