remove bugtrack functions
authorStricted <Stricted@nexus-irc.de>
Sat, 8 Dec 2012 21:33:28 +0000 (22:33 +0100)
committerStricted <Stricted@nexus-irc.de>
Sat, 8 Dec 2012 21:33:28 +0000 (22:33 +0100)
git_bugtrack.php [deleted file]
index.cgi

diff --git a/git_bugtrack.php b/git_bugtrack.php
deleted file mode 100644 (file)
index 9cd226a..0000000
+++ /dev/null
@@ -1,12 +0,0 @@
-<p><?php
-if($_GET["p"]){
-       $hash = shell_exec("git --git-dir=/home/git/".$_GET["p"]." rev-list -n 1 --pretty='format:%h' --header master | grep '^[0-9a-f]*$'");
-       if(!$hash){
-               echo "<b>unknown project or no bugtracker for this project</b>";
-       }else{
-               echo "<b>under construction</b>";
-       }
-}else{
-       echo "<b>unknown project or no bugtracker for this project</b";
-}
-?></p>
\ No newline at end of file
index e16fcbe6bb4177ec3b684a8da4c1d489737b17fb..8d4993568ff9ee212efae669c40776dca53d79d4 100644 (file)
--- a/index.cgi
+++ b/index.cgi
@@ -695,7 +695,6 @@ our %actions = (
        "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
@@ -3345,7 +3344,7 @@ sub guess_file_syntax {
                '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),
        );
@@ -3683,7 +3682,7 @@ sub git_print_page_nav {
        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;
        }
@@ -5168,38 +5167,6 @@ sub git_download {
        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\">&nbsp;</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");