[open-ils-commits] r15940 - branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher (miker)

[svn at svn.open-ils.org]

Author: miker
Date: 2010-03-23 13:48:24 -0400 (Tue, 23 Mar 2010)
New Revision: 15940

Modified:
   branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm
Log:
typos in reservation logic

Modified: branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm
===================================================================
--- branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm	2010-03-23 16:35:52 UTC (rev 15939)
+++ branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm	2010-03-23 17:48:24 UTC (rev 15940)
@@ -1344,7 +1344,7 @@
                     next;
                 }
 
-                my $copy = [ asset::copy->search( deleted => f, barcode => $res->barcode )]->[0];
+                my $copy = [ asset::copy->search( deleted => 'f', barcode => $res->barcode )]->[0];
 
                 unless ($copy) {
                     push @good_resources, $res;
@@ -1415,7 +1415,7 @@
                     sort { $a->[0] <=> $b->[0] }
                     map  {
                         [   actor::org_unit_proximity->search_where(
-                                { from_org => $bresv->pickup_lib.'', to_org => $_=>owner.'' }
+                                { from_org => $bresv->pickup_lib.'', to_org => $_->owner.'' }
                             )->[0]->prox,
                             $_
                         ]