Committer: vtroitsky
LJSUP-13467: Selfpromo/CommPromo model refactoring required for Journal PromoU trunk/cgi-bin/LJ/Pay/SelfPromo.pm
Modified: trunk/cgi-bin/LJ/Pay/SelfPromo.pm =================================================================== --- trunk/cgi-bin/LJ/Pay/SelfPromo.pm 2012-10-05 10:12:52 UTC (rev 12731) +++ trunk/cgi-bin/LJ/Pay/SelfPromo.pm 2012-10-05 13:01:53 UTC (rev 12732) @@ -495,11 +495,10 @@ NOTE: Implementation of the base function =cut sub admin_cancel_promo { - my ( $class, %args ) = @_; + my ( $class, $slot, %args ) = @_; my $promoted_object = $args{'object'}; my $admin = $args{'admin'}; - my $slot = $args{'slot'}; # TODO: Acquire lock to perform cancel action! my $lock = $class->lock($slot);