[ljcom] r10461: LJSUP-8573: One error in a recbill proce...

U   trunk/bin/maint/expiring.pl

Modified: trunk/bin/maint/expiring.pl
===================================================================
--- trunk/bin/maint/expiring.pl	2011-04-28 09:01:51 UTC (rev 10460)
+++ trunk/bin/maint/expiring.pl	2011-04-28 09:39:06 UTC (rev 10461)
@@ -89,7 +89,7 @@
         my $unlock = sub { LJ::Pay::release_lock($u); return 1; };
 
         my $next   = sub { $unlock->() && next ACCOUNT  };
-        my $die    = sub { $unlock->() && $emailerr->($u, $@) && next ACCOUNT };
+        my $die    = sub { $unlock->() && $emailerr->($u, $@) && die $@ };
 
         my $rec = LJ::Pay::RecBill->load( u => $u )
             or $die->();