mourningdove/cgi-bin/LJ/Event/InvitedFriendJoins.pm

# This code was forked from the LiveJournal project owned and operated
# by Live Journal, Inc. The code has been modified and expanded by
# Dreamwidth Studios, LLC. These files were originally licensed under
# the terms of the license supplied by Live Journal, Inc, which can
# currently be found at:
#
# http://code.livejournal.org/trac/livejournal/browser/trunk/LICENSE-LiveJournal.txt
#
# In accordance with the original license, this code and all its
# modifications are provided under the GNU General Public License.
# A copy of that license can be found in the LICENSE file included as
# part of this distribution.

package LJ::Event::InvitedFriendJoins;
use strict;
use Carp qw(croak);
use base 'LJ::Event';

sub new {
    my ( $class, $u, $friendu ) = @_;
    foreach ( $u, $friendu ) {
        croak 'Not an LJ::User' unless LJ::isu($_);
    }

    return $class->SUPER::new( $u, $friendu->{userid} );
}

sub arg_list {
    return ("Friend userid");
}

sub is_common { 0 }

my @_ml_strings = (
    'esn.invited_friend_joins.subject', # '[[who]] created a journal!'
    'esn.add_trust',                    # '[[openlink]]Grant access to [[journal]][[closelink]]',
    'esn.add_watch',                    # '[[openlink]]Subscribe to [[journal]][[closelink]]',
    'esn.read_journal',                 # '[[openlink]]Read [[postername]]\'s journal[[closelink]]',
    'esn.view_profile',                 # '[[openlink]]View [[postername]]\'s profile[[closelink]]',
    'esn.invite_another_friend',        # '[[openlink]]Invite another friend[[closelink]]",
    'esn.invited_friend_joins.email',   # 'Hi [[user]],
                                        #
        # Your friend [[newuser]] has created a journal on [[sitenameshort]]!
        #
        # You can:'
);

sub as_email_subject {
    my ( $self, $u ) = @_;
    return LJ::Lang::get_default_text( 'esn.invited_friend_joins.subject',
        { who => $self->friend->display_username } );
}

sub _as_email {
    my ( $self, $u, $is_html ) = @_;

    return '' unless $u && $self->friend;

    my $user            = $is_html ? $u->ljuser_display : $u->display_username;
    my $newusername     = $self->friend->display_username;
    my $newuser         = $is_html ? $self->friend->ljuser_display : $newusername;
    my $newuser_url     = $self->friend->journal_base;
    my $newuser_profile = $self->friend->profile_url;

    # Precache text lines
    LJ::Lang::get_default_text_multi( \@_ml_strings );

    my $vars = {
        user          => $user,
        who           => $newuser,
        newuser       => $newuser,
        postername    => $newusername,
        journal       => $newusername,
        sitenameshort => $LJ::SITENAMESHORT,
    };

    return LJ::Lang::get_default_text( 'esn.invited_friend_joins.email', $vars )
        . $self->format_options(
        $is_html, undef, $vars,
        {
            'esn.add_trust'    => [ 1, "$LJ::SITEROOT/circle/$newusername/edit?action=access" ],
            'esn.add_watch'    => [ 2, "$LJ::SITEROOT/circle/$newusername/edit?action=subscribe" ],
            'esn.read_journal' => [ 3, $newuser_url ],
            'esn.view_profile' => [ 4, $newuser_profile ],
            'esn.invite_another_friend' => [ 5, "$LJ::SITEROOT/manage/circle/invite" ],
        }
        );
}

sub as_email_string {
    my ( $self, $u ) = @_;
    return _as_email( $self, $u, 0 );
}

sub as_email_html {
    my ( $self, $u ) = @_;
    return _as_email( $self, $u, 1 );
}

sub as_html {
    my $self = shift;

    return 'A friend you invited has created a journal.'
        unless $self->friend;

    return sprintf "A friend you invited has created the journal %s.",
        $self->friend->ljuser_display;
}

sub as_html_actions {
    my ($self) = @_;

    my $ret .= "<div class='actions'>";
    $ret    .= " <a href='" . $self->friend->journal_base . "'>View Journal</a>";
    $ret    .= "</div>";

    return $ret;
}

sub as_string {
    my $self = shift;

    return 'A friend you invited has created a journal.'
        unless $self->friend;

    return sprintf "A friend you invited has created the journal %s.", $self->friend->user;
}

sub friend {
    my $self = shift;
    return LJ::load_userid( $self->arg1 );
}

sub subscription_as_html {
    my ( $class, $subscr ) = @_;
    return BML::ml('event.invited_friend_joins');    # "Someone I invited creates a new journal";
}

sub content {
    my ( $self, $target ) = @_;

    return $self->as_html_actions;
}

sub available_for_user {
    my ( $class, $u, $subscr ) = @_;

    return $u->is_identity ? 0 : 1;
}

1;