[open-ils-commits] r7510 - trunk/Open-ILS/src/support-scripts

[svn at svn.open-ils.org]

Author: miker
Date: 2007-07-03 08:43:39 -0400 (Tue, 03 Jul 2007)
New Revision: 7510

Modified:
   trunk/Open-ILS/src/support-scripts/offline-blocked-list.pl
Log:
JSON moved :)

Modified: trunk/Open-ILS/src/support-scripts/offline-blocked-list.pl
===================================================================
--- trunk/Open-ILS/src/support-scripts/offline-blocked-list.pl	2007-07-03 11:22:41 UTC (rev 7509)
+++ trunk/Open-ILS/src/support-scripts/offline-blocked-list.pl	2007-07-03 12:43:39 UTC (rev 7510)
@@ -14,7 +14,7 @@
     # Make this the default for now.
     # ------------------------------------------------------------
 
-    use JSON;
+    use OpenSRF::Utils::JSON;
     use IPC::Open2 qw/open2/;
 
     sub runmethod {
@@ -29,7 +29,7 @@
         for my $barcode (<$child_stdout>) {
             next if $barcode =~ /^oils/o; # hack to chop out the oils_requestor prompt
             chomp $barcode;
-            $barcode = JSON->JSON2perl($barcode);
+            $barcode = OpenSRF::Utils::JSON->JSON2perl($barcode);
             print "$barcode $flag\n" if $barcode;
         }
         close($child_stdout);