[open-ils-commits] r12902 - trunk/Open-ILS/src/perlmods/OpenILS/Application/Acq (erickson)

[svn at svn.open-ils.org]

Author: erickson
Date: 2009-04-16 21:21:06 -0400 (Thu, 16 Apr 2009)
New Revision: 12902

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
Log:
thinko

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm	2009-04-16 21:52:49 UTC (rev 12901)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm	2009-04-17 01:21:06 UTC (rev 12902)
@@ -622,7 +622,7 @@
     $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