From: erickson Date: Fri, 18 Sep 2009 21:34:39 +0000 (+0000) Subject: if no legacy map for in-db checkout/renew is defined, default to the fail message... X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=c2b574961c601ae154a7823205c401200a852e92;p=working%2FEvergreen.git if no legacy map for in-db checkout/renew is defined, default to the fail message from the in-db process git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_6@14063 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm index d6f9edee11..24c4fc19fa 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm @@ -914,7 +914,7 @@ sub do_inspect { push(@{$results->{failure_codes}}, $_->{fail_part}) for @{$self->matrix_test_result}; push(@{$results->{failure_events}}, - $LEGACY_CIRC_EVENT_MAP->{$_->{fail_part}}) + $LEGACY_CIRC_EVENT_MAP->{$_->{fail_part}} || $_->{fail_part}) for @{$self->matrix_test_result}; } @@ -2431,7 +2431,7 @@ sub run_renew_permit { if(!$self->legacy_script_support) { my $results = $self->run_indb_circ_test; unless($self->circ_test_success) { - push(@$events, $LEGACY_CIRC_EVENT_MAP->{$_->{fail_part}}) for @$results; + push(@$events, $LEGACY_CIRC_EVENT_MAP->{$_->{fail_part}} || $_->{fail_part}) for @$results; } } else {