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 4077203..513e53e 100644 (file)
--- 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  *