JBAS-2297 SIP LOST fee type repairs

Ensure a fee type is reported as LOST for "Lost Materials" only.  E.g.
avoid treating "lost part" as a LOST item.

Signed-off-by: Bill Erickson <berickxx@gmail.com>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm b/Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm
index 6fa4029..15b6c25 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/SIP/Patron.pm
@@ -881,7 +881,7 @@ sub fine_items {
 
         my $fee_type;
 
-        if ($xact->last_billing_type =~ /^Lost/) {
+        if ($xact->last_billing_type eq 'Lost Materials') {
             $fee_type = 'LOST';
         } elsif ($xact->last_billing_type =~ /^Overdue/) {
             $fee_type = 'FINE';