[open-ils-commits] r13033 - trunk/Open-ILS/src/perlmods/OpenILS/WWW (miker)

[svn at svn.open-ils.org]

Author: miker
Date: 2009-05-01 15:28:17 -0400 (Fri, 01 May 2009)
New Revision: 13033

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
Log:
pass in the record position starting at the offset

Modified: trunk/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm	2009-05-01 18:50:49 UTC (rev 13032)
+++ trunk/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm	2009-05-01 19:28:17 UTC (rev 13033)
@@ -1677,7 +1677,8 @@
 			$resp->addRecord(
 				SRU::Response::Record->new(
 					recordSchema    => 'info:srw/schema/1/marcxml-v1.1',
-					recordData => $marcxml
+					recordData => $marcxml,
+					recordPosition => ++$offset
 				)
 			);
 		}