sunnyman's (sunnyman) wrote in changelog,
sunnyman's
sunnyman
changelog

[ljcom] r11961: LJSUP-12208: Check worker to stop expire...

Committer: vtroitsky
LJSUP-12208: Check worker to stop expired promos
U   trunk/bin/maint/selfpromo.pl
Modified: trunk/bin/maint/selfpromo.pl
===================================================================
--- trunk/bin/maint/selfpromo.pl	2012-05-15 15:17:16 UTC (rev 11960)
+++ trunk/bin/maint/selfpromo.pl	2012-05-15 16:33:49 UTC (rev 11961)
@@ -5,14 +5,15 @@
 use vars qw( %maint );
 
 use LJ::Pay::SelfPromo;
-use LJ::Pay::PromotionSlot;
+use LJ::Pay::PromotionSlot qw(:classes :regions);
+use LJ::Pay::PromotedObject qw(:types);
 
 $maint{'selfpromo_check'} = sub {
     # Iterate through all slots available
     for my $region qw(ua cyr) {
         for my $type qw(entry journal community) {
-            my $slot = LJ::Pay::PromotionSlot->find_slot(class => PROMO_SELF, type => $type, region => $region);
-            LJ::Pay::SelfPromo->check_current_promotion($slot) if $slot;
+            my $slot = LJ::Pay::PromotionSlot->find_slot(class => PROMO_SELF(), type => $type, region => $region);
+            $slot->check_current_promotion() if $slot;
         }
     }
 };

Tags: ljcom, pl, sunnyman, vtroitsky
Subscribe
  • Post a new comment

    Error

    Anonymous comments are disabled in this journal

    default userpic

    Your reply will be screened

    Your IP address will be recorded 

  • 0 comments