Author: spadkins
Date: Tue Dec 16 14:51:26 2008
New Revision: 12174

Modified:
   p5ee/trunk/App-Context/lib/App/Serializer/Json.pm

Log:
enabled a few options to allow serialization of blessed objects

Modified: p5ee/trunk/App-Context/lib/App/Serializer/Json.pm
==============================================================================
--- p5ee/trunk/App-Context/lib/App/Serializer/Json.pm   (original)
+++ p5ee/trunk/App-Context/lib/App/Serializer/Json.pm   Tue Dec 16 14:51:26 2008
@@ -55,7 +55,7 @@
 sub serialize {
     &App::sub_entry if ($App::trace);
     my ($self, $perl_scalar) = @_;
-    my $json_text = to_json($perl_scalar, {utf8 => 1, pretty => 1});
+    my $json_text = to_json($perl_scalar, {utf8 => 1, pretty => 1, 
allow_blessed => 1, convert_blessed => 1});
     &App::sub_exit($json_text) if ($App::trace);
     return($json_text);
 }

Reply via email to