strippint $ from deposit_amount
authorerickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Fri, 25 Aug 2006 21:06:39 +0000 (21:06 +0000)
committererickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Fri, 25 Aug 2006 21:06:39 +0000 (21:06 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@5693 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Cat.pm

index 0eec958..eb2d128 100644 (file)
@@ -1036,6 +1036,10 @@ sub fix_copy_price {
        my $p = $copy->price || 0;
        $p =~ s/\$//og;
        $copy->price($p);
+
+       my $d = $copy->deposit_amount || 0;
+       $d =~ s/\$//og;
+       $copy->deposit_amount($d);
 }