<% use Text::Markdown::Hoedown; # API my $api = gitprep_api; # Git my $git = $self->app->git; # Parameters my $user = param('user'); my $project = param('project'); my $rev_file = param('rev_file'); my ($rev, $file) = $git->parse_rev_path($user, $project, $rev_file); # Commit my $commit = $git->last_change_commit($user, $project, $rev, $file); # Authors my $authors = $git->authors($user, $project, $rev, $file); # File size my $file_size = $git->blob_size($user, $project, $rev, $file); # File mode my $mode = $git->blob_mode($user, $project, $rev, $file); my $file_type = $git->file_type_long($mode); # MIME type my $mime_type = $git->blob_mime_type($user, $project, $rev, $file); # Blob lines(only text) my $lines; $lines = $git->blob($user, $project, $rev, $file) if $mime_type =~ /^text/; # Variables for included template stash(id => $rev, project => $project, rev => $rev); %> <% layout 'common' , title => "$project/$file at $rev \x{30fb} $user/$project", stylesheets => ['/js/google-code-prettify/prettify.css']; %> % %= include '/include/header';
%= include '/include/branch_select', display => 'blob', Path => $file;
<%= $commit->{author_name} %> "> <%= $commit->{title} %>
<%= @$authors %> contributor
% if ($lines) { <%= @$lines %> lines | % } <%= $file_size %>kb
% if ($mime_type =~ m#^image/#) {
" title="<%= $file %>" % } src="<%= url_for("/$user/$project/raw/$rev/$file") %>" />
% } elsif ($mime_type =~ m#^text/#) { % if ($file =~ /\.md$/) { % my $readme = join "\n", @$lines; % $readme =~ s#^(\[.*\]:)(?!\s*https?://)\s*(\S*)#$1 /$user/$project/raw/$rev/$2#mg; % $readme =~ s#^(!\[.*\]\()(?!https?://)(\S*)#$1/$user/$project/raw/$rev/$2#mg; % my $readme_e = Text::Markdown::Hoedown::markdown($readme, extensions => HOEDOWN_EXT_FENCED_CODE);
<%== $readme_e %>
% } else {
<% for my $line (@$lines) { %><%= "$line\n" %><% } %>
% } % } else {
">View raw
% }
%= javascript '/js/google-code-prettify/prettify.js'; %= javascript begin // Google prety print prettyPrint(); % end %= include '/include/footer';