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

[svn at svn.open-ils.org]

Author: erickson
Date: 2011-01-11 16:28:26 -0500 (Tue, 11 Jan 2011)
New Revision: 19152

Modified:
   trunk/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: trunk/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm	2011-01-11 00:13:09 UTC (rev 19151)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Acq/Order.pm	2011-01-11 21:28:26 UTC (rev 19152)
@@ -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;