[open-ils-commits] r19153 - branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Acq (erickson)

[svn at svn.open-ils.org]

Author: erickson
Date: 2011-01-11 16:29:31 -0500 (Tue, 11 Jan 2011)
New Revision: 19153

Modified:
   branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
Log:
repaired pending-order vs order-pending thinko.  Thanks to Kathy Lussier and Mike R. for the diagnosis

Modified: branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
===================================================================
--- branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm	2011-01-11 21:28:26 UTC (rev 19152)
+++ branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm	2011-01-11 21:29:31 UTC (rev 19153)
@@ -1267,7 +1267,7 @@
         $args{picklist} = $picklist->id if $picklist;
         if($po) {
             $args{purchase_order} = $po->id;
-            $args{state} = 'order-pending';
+            $args{state} = 'pending-order';
         }
 
         my $li = create_lineitem($mgr, %args) or return $mgr->editor->die_event;