sydney/Autobot
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixed two warnings that we didn't notice before.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-02-08 11:07:15 -07:00
1 parent 34fd8b6e55
commit 394db48d19
1 file changed
+2 -2
Download Patch File Download Diff File Expand all files Collapse all files
modules/Bitly.pm
+2 -2
View File
@@ -61,7 +61,7 @@ sub shorten
return 0;
}
my ($surl, $user, $key) = ($args[0], (conf_get('bitly:user'))[0][0], (conf_get('bitly:key'))[0][0]);
my $surl = uri_escape($surl);
$surl = uri_escape($surl);
my $url = "http://api.bit.ly/v3/shorten?version=3.0.1&longUrl=".$surl."&apiKey=".$key."&login=".$user."&format=txt";
# Get the response via HTTP.
my $response = $ua->get($url);
@@ -98,7 +98,7 @@ sub reverse
return 0;
}
my ($surl, $user, $key) = ($args[0], (conf_get('bitly:user'))[0][0], (conf_get('bitly:key'))[0][0]);
my $surl = uri_escape($surl);
$surl = uri_escape($surl);
my $url = "http://api.bit.ly/v3/expand?version=3.0.1&shortURL=".$surl."&apiKey=".$key."&login=".$user."&format=txt";
# Get the response via HTTP.
my $response = $ua->get($url);