projects
/
scpubgit/stemmatology.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
fix return value mod in distance_trees
[scpubgit/stemmatology.git]
/
stemmaweb
/
lib
/
stemmaweb
/
View
/
SVG.pm
1
package stemmaweb::View::SVG;
2
3
use strict;
4
use base 'Catalyst::View';
5
use Encode qw( decode_utf8 );
6
7
sub process {
8
my( $self, $c ) = @_;
9
$c->res->content_type( 'image/svg+xml' );
10
$c->res->content_encoding( 'UTF-8' );
11
$c->res->output( decode_utf8( $c->stash->{result} ) );
12
}
13
14
1;