From: Jason Etheridge Date: Thu, 14 Jul 2011 21:21:52 +0000 (-0400) Subject: calculate penalties when letting Mark Item Damaged add bills X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=ee5c3191587d870bc200c00fbd1daae819021cfe;p=evergreen%2Fmasslnc.git calculate penalties when letting Mark Item Damaged add bills Signed-off-by: Jason Etheridge Signed-off-by: Galen Charlton --- diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ.pm index f5cc14cf77..fba805a0a0 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ.pm @@ -1275,6 +1275,9 @@ sub handle_mark_damaged { my $ses = OpenSRF::AppSession->create('open-ils.trigger'); $ses->request('open-ils.trigger.event.autocreate', 'checkout.damaged', $circ, $circ->circ_lib); + my $evt2 = OpenILS::Utils::Penalty->calculate_penalties($e, $circ->usr->id, $e->requestor->ws_ou); + return $evt2 if $evt2; + return undef; } else {