sanity check

git-svn-id: svn://svn.open-ils.org/ILS/trunk@5064 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
index 8a59b70..2e5a7f7 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
@@ -299,7 +299,7 @@ sub _set_circ_lost {
        my $copy_price = $copy->price || 0;
 
        # If the copy has a price configured, charge said price to the user
-       if($copy_price) {
+       if($copy_price and $copy_price > 0) {
                $evt = _make_bill($session, $copy_price, 'Lost Materials', $circ->id);
                return $evt if $evt;
        }