updated fine processor to use billing_type in addition to note

git-svn-id: svn://svn.open-ils.org/ILS/trunk@2061 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 da3d7a7..a2cc17c 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm
@@ -349,6 +349,7 @@ sub generate_fines {
                                my $billing = money::billing->create(
                                        { xact          => ''.$c->id,
                                          note          => "Overdue Fine",
+                                         billing_type  => "Overdue materials",
                                          amount        => ''.$c->recuring_fine,
                                          billing_ts    => DateTime->from_epoch( epoch => $last_fine + $fine_interval * $bill )->strftime('%FT%T%z')
                                        }