Doh, I meant that - works better
Tomas Doran (t0m) [Mon, 17 Aug 2009 12:58:13 +0000 (13:58 +0100)]
lib/Catalyst/Action/Serialize/JSON.pm
lib/Catalyst/Action/Serialize/JSON/XS.pm

index a681bcf..3b8e511 100644 (file)
@@ -35,7 +35,7 @@ sub execute {
 
 sub encode {
     my $self = shift;
-    encode_json( @_ );
+    encode_json( shift );
 }
 
 1;
index 6413db9..bac66de 100644 (file)
@@ -8,7 +8,7 @@ use JSON::XS qw(encode_json);
 
 sub encode {
     my $self = shift;
-    encode_json( @_ );
+    encode_json( shift );
 }
 
 1;