[open-ils-commits] r13114 - trunk/Open-ILS/src/perlmods/OpenILS/Application (dbs)

[svn at svn.open-ils.org]

Author: dbs
Date: 2009-05-10 09:05:11 -0400 (Sun, 10 May 2009)
New Revision: 13114

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm
Log:
On third thought, let the caller escape the values; might not be an XML context.


Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm	2009-05-09 18:25:10 UTC (rev 13113)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm	2009-05-10 13:05:11 UTC (rev 13114)
@@ -891,12 +891,6 @@
 			next unless grep { $cp->circ_lib->id == $_ } @ou_ids;
 			next unless ( $cp->deleted eq 'f' || $cp->deleted == 0 );
 
-			# Ugly, but avoids (for now) returning 1 for each of these
-			my $cp_stat = escape($self, $cp->status->name);
-			my $cp_loc = escape($self, $cp->location->name);
-			my $cp_lib = escape($self, $cp->circ_lib->shortname);
-			my $cp_bc = escape($self, $cp->barcode);
-
 			push @{$holdings{$cn->label}{'copies'}}, { barcode => $cp_bc, status => $cp_stat, location => $cp_loc, circlib => $cp_lib};
 
 		}