Cleanup menu options

2022-05-25 23:06:47 +01:00
parent ba80bfd0ad
commit 34612822ae
3 changed files with 39 additions and 41 deletions
@@ -237,9 +237,9 @@ data ScreenLayer
        }
 data MenuOption 
    = Toggle
-        { _moKey    :: Scancode
-        , _moEff    :: Universe -> IO (Maybe Universe)
+        { _moEff    :: Universe -> IO (Maybe Universe)
        , _moString :: Universe -> Either String (String,String)
+        , _moKey    :: Scancode
        }
    | Toggle2
        { _moKey1   :: Scancode