| Subject: | JSON::Any Support |
POE::Filter::JSON should support more than just JSON.pm ... in fact it
should support *ANY* JSON::* package using JSON::Any! Here's a patch
that makes that happen (against the version in the cometd repo :/ let me
know if you want it different from that).
| Subject: | json_any.patch |
--- JSON.pm 2007-04-04 19:17:30.000000000 -0500
+++ JSON.pm.new 2007-04-04 19:09:28.000000000 -0500
@@ -1,7 +1,7 @@
package POE::Filter::JSON;
use Carp;
-use JSON;
+use JSON::Any;
use strict;
use warnings;
@@ -19,9 +19,9 @@
croak "$class requires an even number of parameters" if @_ % 2;
bless( [
- [], # BUFFER
- JSON->new(), # OBJ
- { @_ }, # PARAMS
+ [], # BUFFER
+ JSON::Any->new( allow_nonref => 1 ), # OBJ
+ { @_ }, # PARAMS
], ref $class || $class );
}