thinko

git-svn-id: svn://svn.open-ils.org/ILS/trunk@12902 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
index 15c5421..bc8d91c 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
@@ -622,7 +622,7 @@ sub delete_picklist {
     $lis = $mgr->editor->search_acq_lineitem({picklist => $picklist->id, state => {'!=' => 'new'}});
     for my $li (@$lis) {
         $li->clear_picklist;
-        return 0 unless update_lineitem($li);
+        return 0 unless update_lineitem($mgr, $li);
     }
 
     # remove any picklist-specific object perms