[open-ils-commits] r10221 - branches/rel_1_2/Open-ILS/src/support-scripts

[svn at svn.open-ils.org]

Author: miker
Date: 2008-07-31 12:16:55 -0400 (Thu, 31 Jul 2008)
New Revision: 10221

Modified:
   branches/rel_1_2/Open-ILS/src/support-scripts/fine_generator.pl
Log:
make grace period a command line parameter

Modified: branches/rel_1_2/Open-ILS/src/support-scripts/fine_generator.pl
===================================================================
--- branches/rel_1_2/Open-ILS/src/support-scripts/fine_generator.pl	2008-07-31 16:16:11 UTC (rev 10220)
+++ branches/rel_1_2/Open-ILS/src/support-scripts/fine_generator.pl	2008-07-31 16:16:55 UTC (rev 10221)
@@ -12,6 +12,7 @@
 
 my $config = shift || die "bootstrap config required\n";
 my $lockfile = shift || "/tmp/generate_fines-LOCK";
+my $grace = int(shift()) || 1;
 
 if (-e $lockfile) {
         open(F,$lockfile);
@@ -36,7 +37,7 @@
 
 my $r = OpenSRF::AppSession
 		->create( 'open-ils.storage' )
-		->request( 'open-ils.storage.action.circulation.overdue.generate_fines' => 1 );
+		->request( 'open-ils.storage.action.circulation.overdue.generate_fines' => $grace );
 
 while (!$r->complete) { $r->recv };