Catalyst::View::Atom::XML - XML serialization for Atom objects
package My::App::View::XML;
use strict;
use base qw( Catalyst::View::Atom::XML );
1;
Catalyst::View::Atom::XML provides automatic serialization of
XML::Atom objects for a Catalyst application. Your application needs
only set
"$c->stash->{xml_atom_object}", then
forward to your view, to serialize an XML::Atom object.
For example:
sub foo {
my($self, $c) = @_;
my $entry = XML::Atom::Entry->new;
$entry->title('Foo');
$c->stash->{xml_atom_object} = $entry;
}
sub end : Private {
my($self, $c) = @_;
$c->forward('My::App::View::XML');
}