package WebService::DreamWidth::Entry; use Moose; use MooseX::Embody::JSON; use WebService::DreamWidth::Icon; use WebService::DreamWidth::Poster; # this one is not part of Embody::Json yet has "tags" => (is=>'ro', isa => 'ArrayRef[Str]'); j_obj "icon" =>(class => "WebService::DreamWidth::Icon", is =>'ro'); j_obj "poster" =>(class => "WebService::DreamWidth::Poster", is =>'ro'); j_attr "security" => (is => 'ro'); j_attr "body_html"=> (is => 'ro'); j_attr "subject_raw"=> (is => 'ro'); j_attr "subject_html"=> (is => 'ro'); j_attr "allowmask"=> (is => 'ro'); j_attr "body_raw"=> (is => 'ro'); j_attr "icon_keyword"=> (is => 'ro'); j_attr "entry_id"=> (is => 'ro'); j_attr "datetime"=> (is => 'ro'); j_attr "url" => (is => 'ro');