Committer: ailyin
LJSUP-8191 (rename LJ::API::BitLy to LJ::Client::BitLy)U trunk/cgi-bin/LJ/Event/Befriended.pm U trunk/cgi-bin/LJ/Event/CommentReply.pm U trunk/cgi-bin/LJ/Event/Defriended.pm U trunk/cgi-bin/LJ/Event/InvitedFriendJoins.pm U trunk/cgi-bin/LJ/Event/JournalNewComment.pm U trunk/cgi-bin/LJ/Event/JournalNewEntry.pm U trunk/cgi-bin/LJ/Event/OfficialPost.pm U trunk/cgi-bin/LJ/Event/UserNewEntry.pm
Modified: trunk/cgi-bin/LJ/Event/Befriended.pm
===================================================================
--- trunk/cgi-bin/LJ/Event/Befriended.pm 2011-03-24 11:49:14 UTC (rev 18706)
+++ trunk/cgi-bin/LJ/Event/Befriended.pm 2011-03-25 02:34:47 UTC (rev 18707)
@@ -132,7 +132,7 @@
. $self->friend->user;
my $mparms = $opt->{mobile_url_extra_params};
$tinyurl .= '?' . join('&', map {$_ . '=' . $mparms->{$_}} keys %$mparms) if $mparms;
- $tinyurl = LJ::API::BitLy->shorten($tinyurl);
+ $tinyurl = LJ::Client::BitLy->shorten($tinyurl);
undef $tinyurl if $tinyurl =~ /^500/;
# [[friend]] has added you to their friends list. Reply with ADD [[friend]] to add them [[disclaimer]]
Modified: trunk/cgi-bin/LJ/Event/CommentReply.pm
===================================================================
--- trunk/cgi-bin/LJ/Event/CommentReply.pm 2011-03-24 11:49:14 UTC (rev 18706)
+++ trunk/cgi-bin/LJ/Event/CommentReply.pm 2011-03-25 02:34:47 UTC (rev 18707)
@@ -43,7 +43,7 @@
my $mparms = $opt->{mobile_url_extra_params};
my $tinyurl = $mparms?$self->comment->url( '&' . join('&', map {$_ . '=' . $mparms->{$_}} keys %$mparms))
: $self->comment->url;
- $tinyurl = LJ::API::BitLy->shorten($tinyurl);
+ $tinyurl = LJ::Client::BitLy->shorten($tinyurl);
undef $tinyurl if $tinyurl =~ /^500/;
return $msg . " " . $tinyurl;
Modified: trunk/cgi-bin/LJ/Event/Defriended.pm
===================================================================
--- trunk/cgi-bin/LJ/Event/Defriended.pm 2011-03-24 11:49:14 UTC (rev 18706)
+++ trunk/cgi-bin/LJ/Event/Defriended.pm 2011-03-25 02:34:47 UTC (rev 18707)
@@ -114,7 +114,7 @@
my $tinyurl = "http://m.livejournal.com/read/user/".$self->friend->{user};
my $mparms = $opt->{mobile_url_extra_params};
$tinyurl .= '?' . join('&', map {$_ . '=' . $mparms->{$_}} keys %$mparms) if $mparms;
- $tinyurl = LJ::API::BitLy->shorten($tinyurl);
+ $tinyurl = LJ::Client::BitLy->shorten($tinyurl);
undef $tinyurl if $tinyurl =~ /^500/;
# [[friend]] has removed you from their Friends list.
Modified: trunk/cgi-bin/LJ/Event/InvitedFriendJoins.pm
===================================================================
--- trunk/cgi-bin/LJ/Event/InvitedFriendJoins.pm 2011-03-24 11:49:14 UTC (rev 18706)
+++ trunk/cgi-bin/LJ/Event/InvitedFriendJoins.pm 2011-03-25 02:34:47 UTC (rev 18707)
@@ -109,7 +109,7 @@
$tinyurl = "http://m.livejournal.com/read/user/".$self->friend->user;
my $mparms = $opt->{mobile_url_extra_params};
$tinyurl .= '?' . join('&', map {$_ . '=' . $mparms->{$_}} keys %$mparms) if $mparms;
- $tinyurl = LJ::API::BitLy->shorten($tinyurl);
+ $tinyurl = LJ::Client::BitLy->shorten($tinyurl);
undef $tinyurl if $tinyurl =~ /^500/;
}
Modified: trunk/cgi-bin/LJ/Event/JournalNewComment.pm
===================================================================
--- trunk/cgi-bin/LJ/Event/JournalNewComment.pm 2011-03-24 11:49:14 UTC (rev 18706)
+++ trunk/cgi-bin/LJ/Event/JournalNewComment.pm 2011-03-25 02:34:47 UTC (rev 18707)
@@ -3,7 +3,7 @@
use Scalar::Util qw(blessed);
use Class::Autouse qw(LJ::Comment LJ::HTML::Template);
use Carp qw(croak);
-use LJ::API::BitLy;
+use LJ::Client::BitLy;
use base 'LJ::Event';
# we don't allow subscriptions to comments on friends' journals, so
@@ -274,7 +274,7 @@
my $mparms = $opt->{mobile_url_extra_params};
$tinyurl .= '?' . join('&', map {$_ . '=' . $mparms->{$_}} keys %$mparms) if $mparms;
$tinyurl .= "#comments";
- $tinyurl = LJ::API::BitLy->shorten($tinyurl);
+ $tinyurl = LJ::Client::BitLy->shorten($tinyurl);
undef $tinyurl if $tinyurl =~ /^500/;
return $msg . " " . $tinyurl;
}
Modified: trunk/cgi-bin/LJ/Event/JournalNewEntry.pm
===================================================================
--- trunk/cgi-bin/LJ/Event/JournalNewEntry.pm 2011-03-24 11:49:14 UTC (rev 18706)
+++ trunk/cgi-bin/LJ/Event/JournalNewEntry.pm 2011-03-25 02:34:47 UTC (rev 18707)
@@ -86,7 +86,7 @@
. $self->entry->journal->user . '/' . $self->entry->ditemid . '/';
my $mparms = $opt->{mobile_url_extra_params};
$tinyurl .= '?' . join('&', map {$_ . '=' . $mparms->{$_}} keys %$mparms) if $mparms;
- $tinyurl = LJ::API::BitLy->shorten($tinyurl);
+ $tinyurl = LJ::Client::BitLy->shorten($tinyurl);
undef $tinyurl if $tinyurl =~ /^500/;
my $mlstrng = $self->entry->journal->is_comm ? 'notification.sms.journalnewentry_comm' : 'notification.sms.journalnewentry';
Modified: trunk/cgi-bin/LJ/Event/OfficialPost.pm
===================================================================
--- trunk/cgi-bin/LJ/Event/OfficialPost.pm 2011-03-24 11:49:14 UTC (rev 18706)
+++ trunk/cgi-bin/LJ/Event/OfficialPost.pm 2011-03-25 02:34:47 UTC (rev 18707)
@@ -133,7 +133,7 @@
. $entry->journal->user . '/' . $entry->ditemid . '/';
my $mparms = $opt->{mobile_url_extra_params};
$tinyurl .= '?' . join('&', map {$_ . '=' . $mparms->{$_}} keys %$mparms) if $mparms;
- $tinyurl = LJ::API::BitLy->shorten($tinyurl);
+ $tinyurl = LJ::Client::BitLy->shorten($tinyurl);
undef $tinyurl if $tinyurl =~ /^500/;
# There is a new [[abbrev]] announcement in [[journal]]. Reply with READ [[journal]] to read it. [[disclaimer]]
Modified: trunk/cgi-bin/LJ/Event/UserNewEntry.pm
===================================================================
--- trunk/cgi-bin/LJ/Event/UserNewEntry.pm 2011-03-24 11:49:14 UTC (rev 18706)
+++ trunk/cgi-bin/LJ/Event/UserNewEntry.pm 2011-03-25 02:34:47 UTC (rev 18707)
@@ -109,7 +109,7 @@
. $entry->journal->user . '/' . $entry->ditemid . '/';
my $mparms = $opt->{mobile_url_extra_params};
$tinyurl .= '?' . join('&', map {$_ . '=' . $mparms->{$_}} keys %$mparms) if $mparms;
- $tinyurl = LJ::API::BitLy->shorten($tinyurl);
+ $tinyurl = LJ::Client::BitLy->shorten($tinyurl);
undef $tinyurl if $tinyurl =~ /^500/;
# User '[[user]]' posted in their journal