2009-03-16 12:16:33 +00:00
|
|
|
package Hydra::View::Plain;
|
|
|
|
|
|
|
|
|
|
use strict;
|
|
|
|
|
use warnings;
|
|
|
|
|
use base 'Catalyst::View::Download::Plain';
|
|
|
|
|
|
2012-05-25 14:27:56 +00:00
|
|
|
sub process {
|
|
|
|
|
my ($self, $c) = @_;
|
2013-01-23 12:41:57 +00:00
|
|
|
$c->response->content_encoding("utf-8");
|
|
|
|
|
$c->response->content_type('text/plain') unless $c->response->content_type() ne "";
|
2013-07-12 16:53:48 +02:00
|
|
|
$c->response->body($c->stash->{plain}->{data});
|
2012-05-25 14:27:56 +00:00
|
|
|
}
|
|
|
|
|
|
2009-03-16 12:16:33 +00:00
|
|
|
1;
|
