[catagits/Gitalist.git] / lib / Gitalist / ContentMangler / Resolver / Default.pm

use MooseX::Declare;

class Gitalist::ContentMangler::Resolver::Default with Gitalist::ContentMangler::Resolver {
    method resolve ($data) {
        return unless $data->{filename};
        my $language = 'Perl' if $data->{filename} =~ /\.p[lm]$/i;
        return (['SyntaxHighlight', {language => $language, css => $language}]);
    }
}
Commit	Line	Data
7c781a87	1	use MooseX::Declare;
	2
	3	class Gitalist::ContentMangler::Resolver::Default with Gitalist::ContentMangler::Resolver {
	4	method resolve ($data) {
	5	return unless $data->{filename};
	6	my $language = 'Perl' if $data->{filename} =~ /\.p[lm]$/i;
	7	return (['SyntaxHighlight', {language => $language, css => $language}]);
	8	}
	9	}