Fix switch detection, cleanup

2025-06-25 21:49:11 +01:00
parent a9cae4d409
commit 2f130c5bed
8 changed files with 13 additions and 32 deletions
@@ -8,7 +8,7 @@ import Dodge.WorldEffect

 doButtonEvent :: ButtonEvent -> Button -> World -> World
 doButtonEvent be = case be of
-    ButtonDoNothing -> const id
+--    ButtonDoNothing -> const id
    ButtonPress True _ _ -> const id
    ButtonPress False f _ -> \b ->
        doWdWd f