renderButton :: MenuButton -> Picture
renderButton b = uncurry translate (location b) $ menuButtonPicture b
renderButton :: MenuButton -> Picture
renderButton b = uncurry translate (location b) $ menuButtonPicture b
renderButton b = uncurry translate (location b) $ menuButtonPicture b