oops... left a "warn" in there.
authormiker <miker@9efc2488-bf62-4759-914b-345cdb29e865>
Tue, 8 Mar 2005 23:21:00 +0000 (23:21 +0000)
committermiker <miker@9efc2488-bf62-4759-914b-345cdb29e865>
Tue, 8 Mar 2005 23:21:00 +0000 (23:21 +0000)
git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@205 9efc2488-bf62-4759-914b-345cdb29e865

src/perlmods/JSON.pm

index 0d99806..178f487 100644 (file)
@@ -84,8 +84,6 @@ sub JSON2perl {
        # Convert JSON Unicode...
        s/\\u(\d{4})/chr(hex($1))/esog;
 
-       warn $_;
-
        # Grab strings...
        my @strings = /"((?:(?:\\[\"])|[^\"])*)"/sog;