[scpubgit/stemmaweb.git] / lib / stemmaweb / View / GraphML.pm

package stemmaweb::View::GraphML;

use strict;
use base 'Catalyst::View';

sub process {
	my( $self, $c ) = @_;
	$c->res->content_type( 'application/graphml+xml' );
	$c->res->content_encoding( 'UTF-8' );
	if( $c->stash->{download} ) {
		$c->res->header( 'Content-Disposition', 
			sprintf( "attachment; filename=\"%s.xml\"", $c->stash->{name} ) );
	}
	$c->res->output( $c->stash->{result} );
}

1;
Commit	Line	Data
38627d20	1	package stemmaweb::View::GraphML;
	2
	3	use strict;
	4	use base 'Catalyst::View';
	5
	6	sub process {
	7	my( $self, $c ) = @_;
	8	$c->res->content_type( 'application/graphml+xml' );
	9	$c->res->content_encoding( 'UTF-8' );
6cf17f04	10	if( $c->stash->{download} ) {
	11	$c->res->header( 'Content-Disposition',
	12	sprintf( "attachment; filename=\"%s.xml\"", $c->stash->{name} ) );
	13	}
38627d20	14	$c->res->output( $c->stash->{result} );
	15	}
	16
	17	1;