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

[svn at svn.open-ils.org]

Author: dbs
Date: 2010-12-17 10:19:12 -0500 (Fri, 17 Dec 2010)
New Revision: 19010

Modified:
   branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
Log:
Do an equality test, instead of assigning a value

Thanks to Bill Erickson for catching this; this fixes a bug where
SuperCat requests would end up returning authority records instead of 
bibliographic records.


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	2010-12-17 15:17:43 UTC (rev 19009)
+++ branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm	2010-12-17 15:19:12 UTC (rev 19010)
@@ -998,7 +998,7 @@
 	#}
 
 	my $search = 'record';
-	if ($rtype = 'authority') {
+	if ($rtype eq 'authority') {
 		$search = 'authority';
 	}
 	my $feed = create_record_feed( $search, $type, $list, $unapi, $org_unit->[0]->shortname, undef, $flesh_feed);