"project_index" => \&git_project_index,
"project_index2" => \&git_project_index2,
"download" => \&git_download,
- "bugtracker" => \&git_project_bugtracker,
);
# finally, we have the hash of allowed extra_options for the commands that
'h' => 'c',
map { $_ => 'cpp' } qw(cxx c++ cc),
map { $_ => 'php' } qw(php3 php4),
- map { $_ => 'pl' } qw(perl pm), # perhaps also 'cgi'
+ map { $_ => 'pl' } qw(perl pm cgi), # perhaps also 'cgi'
'mak' => 'make',
map { $_ => 'xml' } qw(xhtml html htm),
);
my ($current, $suppress, $head, $treehead, $treebase, $extra) = @_;
$extra = '' if !defined $extra; # pager or formats
- my @navs = qw(summary bugtracker shortlog log commit commitdiff tree);
+ my @navs = qw(summary shortlog log commit commitdiff tree);
if ($suppress) {
@navs = grep { $_ ne $suppress } @navs;
}
git_footer_html();
}
-sub git_project_bugtracker {
- my $descr = git_get_project_description($project) || "none";
- my $bugtrack = get("http://git.nexus-irc.de/git_bugtrack.php?p=".$project);
- my %co = parse_commit("HEAD");
- my %cd = %co ? parse_date($co{'committer_epoch'}, $co{'committer_tz'}) : ();
- my $head = $co{'id'};
- my $owner = git_get_project_owner($project);
- my $version = get("http://git.nexus-irc.de/git_version.php?git=".$project);
- git_header_html();
- git_print_page_nav('bugtracker','', $head);
- print "<div class=\"title\"> </div>\n";
- print "<table class=\"projects_list\">\n" .
- "<tr id=\"metadata_desc\"><td>description</td><td>" . esc_html($descr) . "</td></tr>\n" .
- "<tr id=\"metadata_owner\"><td>owner</td><td>" . esc_html($owner) . "</td></tr>\n";
- if (defined $cd{'rfc2822'}) {
- print "<tr id=\"metadata_lchange\"><td>last change</td><td>$cd{'rfc2822'}</td></tr>\n";
- }
- my $url_tag = "URL";
- my @url_list = git_get_project_url_list($project);
- @url_list = map { "$_/$project" } @git_base_url_list unless @url_list;
- foreach my $git_url (@url_list) {
- next unless $git_url;
- print "<tr class=\"metadata_url\"><td>$url_tag</td><td>$git_url</td></tr>\n";
- $url_tag = "";
- }
- print "<tr id=\"metadata_owner\"><td>version</td><td>" . esc_html($version) . "</td></tr>\n";
- print "</table>\n";
- git_print_header_div('bugtracker');
- print $bugtrack;
- git_footer_html();
-}
-
sub git_summary {
my $descr = git_get_project_description($project) || "none";
my %co = parse_commit("HEAD");