[ljcom] r9411: LJSUP-6515: Custom Userheads - LJSUP-659...

U   trunk/bin/upgrading/en_LJ.dat
U   trunk/cgi-bin/LJ/Pay/Payment/PayItem/Addon.pm
U   trunk/cgi-bin/LJ/Pay/Payment/PayItem/UserHead.pm

Modified: trunk/bin/upgrading/en_LJ.dat
===================================================================
--- trunk/bin/upgrading/en_LJ.dat	2010-08-26 08:17:36 UTC (rev 9410)
+++ trunk/bin/upgrading/en_LJ.dat	2010-08-26 09:22:32 UTC (rev 9411)
@@ -3886,6 +3886,8 @@
 
 pay.cart.method_group.fast=Takes a few minutes...
 
+pay.cart.method_group.other=
+
 pay.cart.method_group.slow=Takes a few days...
 
 pay.cart.nocharge=No charge.

Modified: trunk/cgi-bin/LJ/Pay/Payment/PayItem/Addon.pm
===================================================================
--- trunk/cgi-bin/LJ/Pay/Payment/PayItem/Addon.pm	2010-08-26 08:17:36 UTC (rev 9410)
+++ trunk/cgi-bin/LJ/Pay/Payment/PayItem/Addon.pm	2010-08-26 09:22:32 UTC (rev 9411)
@@ -832,6 +832,16 @@
     $note_rec_change->($rcpt_u, $payment);
 
     # send notification email to user
+    my ($subj, $msg) = $self->_delivering_message($rcpt_u);
+
+    warn "[$item_id]: _deliver_item is ok" if $::VERBOSE>1;
+    return (1, $subj, $msg);
+}
+
+sub _delivering_message {
+    my $self = shift;
+    my $rcpt_u = shift;
+
     my $name = $self->product_name;
 
     my $msg = "Your $LJ::SITENAMESHORT account for user \"$rcpt_u->{'user'}\" has been ";
@@ -844,9 +854,7 @@
     $msg .= "Thank you for supporting the site,\n";
     $msg .= "$LJ::SITENAMESHORT Team\n";
 
-    
-    warn "[$item_id]: _deliver_item is ok" if $::VERBOSE>1;
-    return (1, $name, $msg);
+    return ($name, $msg);
 }
 
 sub get_item_base_price {

Modified: trunk/cgi-bin/LJ/Pay/Payment/PayItem/UserHead.pm
===================================================================
--- trunk/cgi-bin/LJ/Pay/Payment/PayItem/UserHead.pm	2010-08-26 08:17:36 UTC (rev 9410)
+++ trunk/cgi-bin/LJ/Pay/Payment/PayItem/UserHead.pm	2010-08-26 09:22:32 UTC (rev 9411)
@@ -100,5 +100,17 @@
     $u->set_custom_usericon (undef);
 }
 
+sub _delivering_message {
+    my $self = shift;
+    my $rcpt_u = shift;
+
+    my $msg = "Please visit your Edit Profile page to view your new userhead.\n\n";
+    $msg .= "$LJ::SITEROOT/manage/profile/\n\n";
+    $msg .= "Sincerely,\n";
+    $msg .= "The $LJ::SITENAMESHORT Team\n";
+
+    return ("You have received a userhead to your $LJ::SITENAMESHORT", $msg);
+}
+
 1;