From: erickson <erickson@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Mon, 31 Aug 2009 17:17:28 +0000 (+0000)
Subject: repaired partial change from 'class' to 'pkg'.  added use strict/warnings
X-Git-Tag: osrf_rel_2_0_1~322
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=be89a9a1bfd716c3c3919f28b8984a9dc12130ff;p=OpenSRF.git

repaired partial change from 'class' to 'pkg'.  added use strict/warnings

git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@1764 9efc2488-bf62-4759-914b-345cdb29e865
---

diff --git a/src/perl/lib/OpenSRF/Utils/JSON.pm b/src/perl/lib/OpenSRF/Utils/JSON.pm
index 8ea2815..5ab9917 100644
--- a/src/perl/lib/OpenSRF/Utils/JSON.pm
+++ b/src/perl/lib/OpenSRF/Utils/JSON.pm
@@ -1,4 +1,5 @@
 package OpenSRF::Utils::JSON;
+use strict; use warnings;
 use JSON::XS;
 
 our $parser = JSON::XS->new;
@@ -62,8 +63,8 @@ sub lookup_hint {
 
 sub JSON2perl {
     my( $pkg, $string ) = @_;
-    my $perl = $class->rawJSON2perl($string);
-    return $class->JSONObject2Perl($perl);
+    my $perl = $pkg->rawJSON2perl($string);
+    return $pkg->JSONObject2Perl($perl);
 }
 
 =head2 perl2JSON