From: Jason Stephenson <jason@sigio.com>
Date: Sat, 8 Jan 2022 19:20:00 +0000 (-0500)
Subject: Use auth in savepoint name
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=6b10ef4a8c83f77c903dd44bab345226da70259b;p=working%2FEvergreen.git

Use auth in savepoint name
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ.pm
index 7e57a65677..912f95106c 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Circ.pm
@@ -380,7 +380,7 @@ sub update_copy_inventory {
     return [0, 0, $e->die_event] unless $e->checkauth;
 
     my ($success,$failure) = (0,0);
-
+    my $spname = "aci_savepoint_" . substr($auth, 0, 8);
     $e->xact_begin();
     my $copies = $$args{copy_list};
     foreach my $copyid (@$copies) {
@@ -388,7 +388,6 @@ sub update_copy_inventory {
         $aci->inventory_date('now');
         $aci->inventory_workstation($e->requestor->wsid);
         $aci->copy($copyid);
-        my $spname = "aci_savepoint${success}";
         $e->set_savepoint($spname);
         if ($e->create_asset_copy_inventory($aci)) {
             $success++;