Initial stab at a working ContentMangler.
[catagits/Gitalist.git] / lib / Gitalist / ContentMangler / Resolver / Default.pm
index 607f4d4..29aeda4 100644 (file)
@@ -2,8 +2,11 @@ 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}]);
+        # This should be pulled out of $self->config
+        my $language;
+        $language = 'Perl' if $data->{filename} =~ /\.p[lm]$/i;
+        $language = 'Diff' if $data->{action} eq 'diff_fancy';
+        return unless $language;
+        return 'Gitalist::ContentMangler::Transformer::SyntaxHighlight' => {language => $language, css => $language};
     }
-}
\ No newline at end of file
+}