Committer: iaskarov
LJSUP-6563: storage space add-on not being charged or creditedThis is about to fix the issue
U trunk/cgi-bin/LJ/Pay/Payment/PayItem/Addon/Sized.pm U trunk/cgi-bin/LJ/Pay/Payment/PayItem/DiskQuota.pm
Modified: trunk/cgi-bin/LJ/Pay/Payment/PayItem/Addon/Sized.pm =================================================================== --- trunk/cgi-bin/LJ/Pay/Payment/PayItem/Addon/Sized.pm 2010-11-18 03:40:36 UTC (rev 9728) +++ trunk/cgi-bin/LJ/Pay/Payment/PayItem/Addon/Sized.pm 2010-11-18 03:45:48 UTC (rev 9729) @@ -1,7 +1,7 @@ package LJ::Pay::Payment::PayItem::Addon::Sized; use strict; -use LJ::Pay::Util qw/_err _get_dbh/; +use LJ::Pay::Util qw/_err _get_dbh _max/; use base "LJ::Pay::Payment::PayItem::Addon"; sub _activate_item { return 1; } @@ -369,7 +369,7 @@ # return the new price return $price * $ratio; } else { - return $self->SUPER::get_recbill_price_for_existing_item($recbill_item); + return $self->SUPER::get_recbill_price_for_existing_item($recbill_item, $next_check); } } Modified: trunk/cgi-bin/LJ/Pay/Payment/PayItem/DiskQuota.pm =================================================================== --- trunk/cgi-bin/LJ/Pay/Payment/PayItem/DiskQuota.pm 2010-11-18 03:40:36 UTC (rev 9728) +++ trunk/cgi-bin/LJ/Pay/Payment/PayItem/DiskQuota.pm 2010-11-18 03:45:48 UTC (rev 9729) @@ -339,7 +339,7 @@ # return the new price return $price * $ratio; } else { - return $self->SUPER::get_recbill_price_for_existing_item($recbill_item); + return $self->SUPER::get_recbill_price_for_existing_item($recbill_item, $next_check); } }