Created
July 16, 2019 21:51
-
-
Save hakonhagland/1a2307974a9ff6ad4faac8de9cf7437c to your computer and use it in GitHub Desktop.
Fix syntax errors in OAuth.pm
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
diff --git a/OAuth.pm b/OAuth.pm | |
index 5985f5d..d15b367 100644 | |
--- a/OAuth.pm | |
+++ b/OAuth.pm | |
@@ -193,7 +193,7 @@ the object back to the state it was in when constructed. | |
sub resetTokens { | |
my $this = shift; | |
- for my $key qw(request_token request_token_secret access_token access_token_secret) | |
+ for my $key (qw(request_token request_token_secret access_token access_token_secret)) | |
{ | |
delete $this->{$key}; | |
} | |
@@ -339,7 +339,7 @@ sub request_access_token { | |
$this->{access_token_secret} = $response->param('oauth_token_secret'); | |
# Now that we have a good access token/secret we dont need the request tokens | |
- for my $key qw(request_token request_token_secret) | |
+ for my $key (qw(request_token request_token_secret)) | |
{ | |
delete $this->{$key}; | |
} | |
@@ -402,7 +402,7 @@ sub set_access_token { | |
# Now that we have a good access token/secret we dont need the request tokens | |
# if they are kicking arround | |
- for my $key qw(request_token request_token_secret) | |
+ for my $key (qw(request_token request_token_secret)) | |
{ | |
delete $this->{$key}; | |
} |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment