From: erickson Date: Fri, 17 Apr 2009 01:21:06 +0000 (+0000) Subject: thinko X-Git-Tag: sprint4-merge-nov22~10227 X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=9c11e50017b3115759ffd38afeeff4b18373a735;p=working%2FEvergreen.git 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 15c5421535..bc8d91c8fa 100644 --- 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