[ljcom] r9736: LJSUP-7167: revoking payment does not re...

U   trunk/cgi-bin/LJ/Pay/Payment/PayItem/UserHead.pm

Modified: trunk/cgi-bin/LJ/Pay/Payment/PayItem/UserHead.pm
===================================================================
--- trunk/cgi-bin/LJ/Pay/Payment/PayItem/UserHead.pm	2010-11-18 10:10:25 UTC (rev 9735)
+++ trunk/cgi-bin/LJ/Pay/Payment/PayItem/UserHead.pm	2010-11-19 04:46:11 UTC (rev 9736)
@@ -118,6 +118,10 @@
     return undef unless $u;
 
     $u->set_custom_usericon (undef);
+    
+    # Drop this item from the list
+    my $dbh = _get_dbh();
+    $dbh->do("DELETE FROM paidexp where userid=? AND item=?", undef, $u->userid, $self->{subitem});
 }
 
 sub _delivering_message {