[Jifty-commit] jifty branch, master, updated. 783d37f056b6b6fbf84f90cc0b844c89fb5397f8

[Jifty commits]

The branch, master has been updated
       via  783d37f056b6b6fbf84f90cc0b844c89fb5397f8 (commit)
      from  85610121ff43bc954fe9af72dfbc09adfa286d60 (commit)

Summary of changes:
 lib/Jifty/Plugin/REST/Dispatcher.pm    |    3 +++
 t/TestApp-Plugin-REST/t/02-basic-use.t |    3 ++-
 2 files changed, 5 insertions(+), 1 deletions(-)

- Log -----------------------------------------------------------------
commit 783d37f056b6b6fbf84f90cc0b844c89fb5397f8
Author: Chia-liang Kao <clkao at clkao.org>
Date:   Thu Apr 29 19:38:58 2010 +0800

    add serialized_as to model meta data from REST.

diff --git a/lib/Jifty/Plugin/REST/Dispatcher.pm b/lib/Jifty/Plugin/REST/Dispatcher.pm
index a2c078f..68c32be 100644
--- a/lib/Jifty/Plugin/REST/Dispatcher.pm
+++ b/lib/Jifty/Plugin/REST/Dispatcher.pm
@@ -546,6 +546,9 @@ sub list_model_columns {
             $cols{ $col->name }->{ $_ } = Scalar::Defer::force($val)
                 if defined $val and length $val;
         }
+        if (my $serialized = $col->attributes->{serialized}) {
+            $cols{ $col->name }->{serialized_as} = $serialized;
+        }
         $cols{ $col->name }{writable} = 0 if exists $cols{$col->name}{writable} and $col->protected;
     }
 
diff --git a/t/TestApp-Plugin-REST/t/02-basic-use.t b/t/TestApp-Plugin-REST/t/02-basic-use.t
index 93333d9..3a0edb3 100644
--- a/t/TestApp-Plugin-REST/t/02-basic-use.t
+++ b/t/TestApp-Plugin-REST/t/02-basic-use.t
@@ -9,7 +9,7 @@ This is a template for your own tests. Copy it and modify it.
 
 =cut
 
-use Jifty::Test::Dist tests => 86;
+use Jifty::Test::Dist tests => 87;
 use Jifty::Test::WWW::Mechanize;
 
 my $server  = Jifty::Test->make_server;
@@ -62,6 +62,7 @@ my %keys =  %{get_content()};
 
 is((0+keys(%keys)), 5, "The model has 5 keys");
 is_deeply([sort keys %keys], [sort qw/group_id id name email tasty/]);
+is_deeply($keys{'group_id'}{serialized_as}, { name => 'group', columns => [qw(id name)] });
 
 # on GET    '/=/model/*/*'   => \&list_model_items;
 $mech->get_ok('/=/model/user/id.yml');

-----------------------------------------------------------------------