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

[svn at svn.open-ils.org]

Author: erickson
Date: 2010-10-28 16:05:52 -0400 (Thu, 28 Oct 2010)
New Revision: 18532

Modified:
   trunk/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: trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm	2010-10-28 18:20:29 UTC (rev 18531)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm	2010-10-28 20:05:52 UTC (rev 18532)
@@ -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();