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

Remove this check as it prevents from Bit.ly Pro Custom URLs.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-02-01 20:22:18 -07:00
1 parent 0adcdf4b8f
commit 41fb41eda0
1 file changed
+3 -9
Download Patch File Download Diff File Expand all files Collapse all files
modules/Bitly.pm
+3 -9
View File
@@ -71,14 +71,8 @@ sub shorten
# If successful, decode the content. # If successful, decode the content.
my $d = $response->decoded_content; my $d = $response->decoded_content;
chomp $d; chomp $d;
if ($d =~ m/bit.ly/i) { # And send to channel.
# And send to channel. privmsg($data{svr}, $data{chan}, "URL: ".$d);
privmsg($data{svr}, $data{chan}, "URL: ".$d);
}
else {
# Otherwise, send an error message.
privmsg($data{svr}, $data{chan}, "An error occurred while shortening your URL.");
}
} }
else { else {
# Otherwise, send an error message. # Otherwise, send an error message.
@@ -110,7 +104,7 @@ sub reverse
my $d = $response->decoded_content; my $d = $response->decoded_content;
chomp $d; chomp $d;
# And send it to channel. # And send it to channel.
privmsg($data{svr}, $data{chan}, "URL: ".$d); privmsg($data{svr}, $data{chan}, "URL: ".$d);
} }
else { else {
# Otherwise, send an error message. # Otherwise, send an error message.