Kay Sievers 20 years ago
parent
commit
8ab1da2c4f
  1. 21
      gitweb.cgi

21
gitweb.cgi

@ -14,7 +14,7 @@ use CGI::Carp qw(fatalsToBrowser); @@ -14,7 +14,7 @@ use CGI::Carp qw(fatalsToBrowser);
use Fcntl ':mode';

my $cgi = new CGI;
my $version = "133";
my $version = "136";
my $my_url = $cgi->url();
my $my_uri = $cgi->url(-absolute => 1);
my $rss_link = "";
@ -32,6 +32,9 @@ my $gittmp = "/tmp/gitweb"; @@ -32,6 +32,9 @@ my $gittmp = "/tmp/gitweb";
#my $home_link = $my_uri;
my $home_link = "/git";

# html text to include at home page
my $home_text = "indextext.html";

# source of projects list
#my $projects_list = $projectroot;
my $projects_list = "index/index.txt";
@ -205,6 +208,7 @@ td.link { font-family:sans-serif; font-size:10px; } @@ -205,6 +208,7 @@ td.link { font-family:sans-serif; font-size:10px; }
td.pre { font-family:monospace; font-size:12px; white-space:pre; padding:2px 15px 0px 0px; }
div.pre { font-family:monospace; font-size:12px; white-space:pre; }
div.diff_info { font-family:monospace; color:#000099; background-color:#edece6; font-style:italic; }
div.index_include { border:solid #d9d8d1; border-width:0px 0px 1px; padding:12px 8px; }
a.rss_logo { float:right; padding:3px 0px; width:35px; line-height:10px;
border:1px solid; border-color:#fcc7a5 #7d3302 #3e1a01 #ff954e;
color:#ffffff; background-color:#ff6600;
@ -217,7 +221,7 @@ a.rss_logo:hover { background-color:#ee5500; } @@ -217,7 +221,7 @@ a.rss_logo:hover { background-color:#ee5500; }
<body>
EOF
print "<div class=\"page_header\">\n" .
"<a href=\"http://kernel.org/pub/software/scm/cogito\">" .
"<a href=\"http://kernel.org/pub/software/scm/git/docs/\">" .
"<img src=\"$my_uri?a=git-logo.png\" width=\"72\" height=\"27\" alt=\"git\" style=\"float:right; border-width:0px;\"/></a>";
print $cgi->a({-href => $home_link}, "projects") . " / ";
if (defined $project) {
@ -554,9 +558,16 @@ sub git_project_list { @@ -554,9 +558,16 @@ sub git_project_list {
@list = sort {$a->{'path'} cmp $b->{'path'}} @list;

git_header_html();
print "<div class=\"page_body\"><br/>\n";
print "<table cellspacing=\"0\">\n";
print "<tr>\n" .
if (-f $home_text) {
print "<div class=\"index_include\">\n";
open my $fd, $home_text;
print <$fd>;
close $fd;
print "</div>\n";
}
print "<div class=\"page_body\"><br/>\n" .
"<table cellspacing=\"0\">\n" .
"<tr>\n" .
"<th>Project</th>\n" .
"<th>Description</th>\n" .
"<th>Owner</th>\n" .

Loading…
Cancel
Save