From: miker Date: Mon, 8 Sep 2008 18:04:45 +0000 (+0000) Subject: back/forward porting grace testing (0 grace allowed) X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=e71cc1756455692cfce5e881ebaf6229fe35f36d;p=Evergreen.git back/forward porting grace testing (0 grace allowed) git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_2@10556 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm index 4077203648..513e53eab7 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm @@ -94,7 +94,11 @@ sub overdue_circs { my $c_t = action::circulation->table; - $grace = " - ($grace * (fine_interval))" if ($grace); + if ($grace) { + $grace = " - ($grace * (fine_interval))" if ($grace); + } else { + $grace = ''; + } my $sql = <<" SQL"; SELECT *