summaryrefslogtreecommitdiff
path: root/gitweb.cgi
diff options
context:
space:
mode:
authorLibravatar Kay Sievers <kay.sievers@suse.de>2005-08-07 20:23:49 +0200
committerLibravatar Kay Sievers <kay.sievers@suse.de>2005-08-07 20:23:49 +0200
commit7403d50bd2c6a9e72dd5e3db61d68befa8dc34fb (patch)
tree02d9dfa5b8df2308dead10f0d1f315bd8407659c /gitweb.cgi
parentv145 (diff)
downloadtgif-7403d50bd2c6a9e72dd5e3db61d68befa8dc34fb.tar.xz
v148
Diffstat (limited to 'gitweb.cgi')
-rwxr-xr-xgitweb.cgi13
1 files changed, 9 insertions, 4 deletions
diff --git a/gitweb.cgi b/gitweb.cgi
index a2b2e27fed..e738ea2ba4 100755
--- a/gitweb.cgi
+++ b/gitweb.cgi
@@ -10,11 +10,12 @@
use strict;
use warnings;
use CGI qw(:standard :escapeHTML);
+use CGI::Util qw(unescape);
use CGI::Carp qw(fatalsToBrowser);
use Fcntl ':mode';
my $cgi = new CGI;
-my $version = "145";
+my $version = "148";
my $my_url = $cgi->url();
my $my_uri = $cgi->url(-absolute => 1);
my $rss_link = "";
@@ -36,7 +37,7 @@ my $home_text = "indextext.html";
# source of projects list
#my $projects_list = $projectroot;
-my $projects_list = "index/index.txt";
+my $projects_list = "index/index.aux";
# input validation and dispatch
my $action = $cgi->param('a');
@@ -563,7 +564,9 @@ sub git_project_list {
open my $fd , $projects_list || return undef;
while (my $line = <$fd>) {
chomp $line;
- my ($path, $owner) = split ':', $line;
+ my ($path, $owner) = split ' ', $line;
+ $path = unescape($path);
+ $owner = unescape($owner);
if (!defined $path) {
next;
}
@@ -691,7 +694,9 @@ sub git_summary {
open (my $fd , $projects_list);
while (my $line = <$fd>) {
chomp $line;
- my ($pr, $ow) = split ':', $line;
+ my ($pr, $ow) = split ' ', $line;
+ $pr = unescape($pr);
+ $ow = unescape($ow);
if ($pr eq $project) {
$owner = $ow;
last;