[open-ils-commits] r20338 - branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/WWW (dbs)

[svn at svn.open-ils.org]

Author: dbs
Date: 2011-04-27 08:24:20 -0400 (Wed, 27 Apr 2011)
New Revision: 20338

Modified:
   branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
Log:
One more strictly integer check for fleshing feeds in SuperCat

Missed this one in r20336. Argh.

Signed-off-by: Dan Scott <dscott at laurentian.ca>


Modified: branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
===================================================================
--- branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm	2011-04-27 12:21:13 UTC (rev 20337)
+++ branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm	2011-04-27 12:24:20 UTC (rev 20338)
@@ -1466,7 +1466,7 @@
 		next unless $node;
 
 		$xml = '';
-		if ($lib && ($type eq 'marcxml' || $type eq 'atom') &&  ($flesh > 0 || $flesh == 'uris')) {
+		if ($lib && ($type eq 'marcxml' || $type eq 'atom') &&  ($flesh > 0)) {
 			my $r = $supercat->request( "open-ils.supercat.$search.holdings_xml.retrieve", $rec, $lib, $depth, $flesh_feed, $paging );
 			while ( !$r->complete ) {
 				$xml .= join('', map {$_->content} $r->recv);