settingsToKey :: Settings -> HabiticaApiKey
settingsToKey Settings{..} = HabiticaApiKey user key
settingsToKey :: Settings -> HabiticaApiKey
settingsToKey Settings{..} = HabiticaApiKey user key
settingsToKey Settings{..} = HabiticaApiKey user key