Start pushing updateUseInput into other update functions

src/Dodge/Update/Input/InGame.hs

@@ -29,8 +29,8 @@ import Geometry
 import LensHelp
 import SDL
 
-updateUseInputInGame :: HUDElement -> Universe -> Universe
-updateUseInputInGame h u = case h of
+updateUseInputInGame :: Universe -> Universe
+updateUseInputInGame u = case u ^. uvWorld . hud . hudElement of
     DisplayCarte -> over uvWorld updatePressedButtonsCarte u
     DisplayInventory{_subInventory = si} -> case si of
         DisplayTerminal tmid