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

[svn at svn.open-ils.org]

Author: erickson
Date: 2010-10-28 16:06:14 -0400 (Thu, 28 Oct 2010)
New Revision: 18533

Modified:
   branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
Log:
calling noop with no arguments (and not capturing the output) is, well, a no-op.  set the value to true as originally intended

Modified: branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
===================================================================
--- branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm	2010-10-28 20:05:52 UTC (rev 18532)
+++ branches/rel_2_0/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm	2010-10-28 20:06:14 UTC (rev 18533)
@@ -268,7 +268,7 @@
     $circulator->is_checkin(1) if $api =~ /checkin/;
 
     $circulator->mk_env();
-    $circulator->noop if $circulator->claims_never_checked_out;
+    $circulator->noop(1) if $circulator->claims_never_checked_out;
 
     if($legacy_script_support and not $circulator->is_checkin) {
         $circulator->mk_script_runner();