package CPANRatings::Control::RecentRSS;
use strict;
use base qw(CPANRatings::Control);
use Combust::Constant qw(OK);

sub render {
    my $self = shift;

    $self->tpl_param('header', 'Recent reviews');

    my $reviews = CPANRatings::Model::Reviews->search_recent;
    my $output = $self->as_rss($reviews);
    return OK, $output, 'application/rdf+xml';
}
 


1;

package CPANRatings::Control::RecentRSS;
use strict;
use base qw(CPANRatings::Control);
use Combust::Constant qw(OK);

sub render {
    my $self = shift;

    $self->tpl_param('header', 'Recent reviews');

    my $reviews = $self->schema->review->recent;
    my $output = $self->as_rss($reviews);
    return OK, $output, 'application/rdf+xml';
}
 


1;

Make RSS index work again
Make RSS index work again
