From: miker Date: Sun, 10 May 2009 14:03:07 +0000 (+0000) Subject: use direct access -- those variables do not exist anymore X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=a5191643284956ba569776a9654d2b830e53a1d5;p=Evergreen.git use direct access -- those variables do not exist anymore git-svn-id: svn://svn.open-ils.org/ILS/trunk@13115 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm b/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm index c79148712e..46ff960eba 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm @@ -891,7 +891,12 @@ sub basic_record_holdings { next unless grep { $cp->circ_lib->id == $_ } @ou_ids; next unless ( $cp->deleted eq 'f' || $cp->deleted == 0 ); - push @{$holdings{$cn->label}{'copies'}}, { barcode => $cp_bc, status => $cp_stat, location => $cp_loc, circlib => $cp_lib}; + push @{$holdings{$cn->label}{'copies'}}, { + barcode => $cp->barcode, + status => $cp->status->name, + location => $cp->location->name, + circlib => $cp->circ_lib->shortname + }; } }