Apply fix for URI ingest from r18482
authordbs <dbs@6d9bc8c9-1ec2-4278-b937-99fde70a366f>
Wed, 27 Oct 2010 02:35:06 +0000 (02:35 +0000)
committerdbs <dbs@6d9bc8c9-1ec2-4278-b937-99fde70a366f>
Wed, 27 Oct 2010 02:35:06 +0000 (02:35 +0000)
git-svn-id: svn://svn.open-ils.org/ILS-Contrib/conifer/branches/rel_1_6_1@1055 6d9bc8c9-1ec2-4278-b937-99fde70a366f

src/perlmods/OpenILS/Application/Ingest.pm

index e7e2bf0..9920694 100644 (file)
@@ -419,8 +419,8 @@ sub ro_biblio_ingest_single_object {
     }
 
     if (!$max_uri) {
-        my $cn = $cstore->request( 'open-ils.cstore.direct.asset.call_number.search' => { id => { '!=' => undef } }, { limit => 1, order_by => { acn => 'id desc' } } )->gather(1);
-        $max_uri = int($cn->id) + 1000;
+        my $uri = $cstore->request( 'open-ils.cstore.direct.asset.uri.search' => { id => { '!=' => undef } }, { limit => 1, order_by => { auri => 'id desc' } } )->gather(1);
+        $max_uri = int($uri->id) + 1000;
     }
 
     $cstore->disconnect;