Merge branch 'master' of github.com:AnonymusRaccoon/Aeris into github_login

This commit is contained in:
Clément Le Bihan
2022-03-06 15:08:22 +01:00
14 changed files with 131 additions and 74 deletions
+3 -3
View File
@@ -13,11 +13,11 @@
},
"params": [
{
"name": "channel",
"name": "channel_id",
"type": "string",
"description": {
"en": "Name of the channel to watch over",
"fr": "Le nom de la chaîne à regarder"
"en": "ID of the channel to watch over",
"fr": "L'ID de la chaîne à regarder"
}
}
],
+1 -1
View File
@@ -57,7 +57,7 @@ urlHandler Twitter (Just r) = do
clientId <- liftIO $ envAsString "TWITTER_CLIENT_ID" ""
backRedirect <- liftIO $ envAsString "BACK_URL" ""
throwError $ err302 { errHeaders =
[("Location", B8.pack $ "https://twitter.com/i/oauth2/authorize?response_type=code&scope=like.write like.read follows.read follows.write offline.access tweet.read tweet.write&code_challenge=challenge&code_challenge_method=plain&client_id=" ++ clientId ++ "&redirect_uri=" ++ backRedirect ++ "auth/redirect" ++ "&state=" ++ r)] }
[("Location", B8.pack $ "https://twitter.com/i/oauth2/authorize?response_type=code&scope=like.write like.read follows.read follows.write offline.access tweet.read tweet.write users.read&code_challenge=challenge&code_challenge_method=plain&client_id=" ++ clientId ++ "&redirect_uri=" ++ backRedirect ++ "auth/redirect" ++ "&state=" ++ r)] }
urlHandler Spotify (Just r) = do
clientId <- liftIO $ envAsString "SPOTIFY_CLIENT_ID" ""
backRedirect <- liftIO $ envAsString "BACK_URL" ""