projects / git.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
v267
[git.git] / gitweb.cgi
diff --git a/gitweb.cgi b/gitweb.cgi
index 26c7395..ea21fbe 100755 (executable)
--- a/gitweb.cgi
+++ b/gitweb.cgi
@@ -2,8 +2,8 @@
 
 # gitweb - simple web interface to track changes in git repositories
 #
-# (C) 2005, Kay Sievers <kay.sievers@vrfy.org>
-# (C) 2005, Christian Gierke <ch@gierke.de>
+# (C) 2005-2006, Kay Sievers <kay.sievers@vrfy.org>
+# (C) 2005, Christian Gierke
 #
 # This program is licensed under the GPLv2
 
@@ -17,7 +17,7 @@ use Fcntl ':mode';
 binmode STDOUT, ':utf8';
 
 my $cgi = new CGI;
-my $version =          "262";
+my $version =          "267";
 my $my_url =           $cgi->url();
 my $my_uri =           $cgi->url(-absolute => 1);
 my $rss_link =         "";
@@ -253,7 +253,7 @@ sub git_header_html {
 <?xml version="1.0" encoding="utf-8"?>
 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
 <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en-US" lang="en-US">
-<!-- git web interface v$version, (C) 2005, Kay Sievers <kay.sievers\@vrfy.org>, Christian Gierke <ch\@gierke.de> -->
+<!-- git web interface v$version, (C) 2005-2006, Kay Sievers <kay.sievers\@vrfy.org>, Christian Gierke -->
 <head>
 <meta http-equiv="content-type" content="text/html; charset=utf-8"/>
 <meta name="robots" content="index, nofollow"/>
@@ -404,12 +404,13 @@ sub git_read_head {
        if (open my $fd, "-|", "$gitbin/git-rev-parse", "--verify", "HEAD") {
                my $head = <$fd>;
                close $fd;
-               chomp $head;
-               if ($head =~ m/^[0-9a-fA-F]{40}$/) {
-                       $retval = $head;
+               if (defined $head && $head =~ /^([0-9a-fA-F]{40})$/) {
+                       $retval = $1;
                }
        }
-       $ENV{'GIT_DIR'} = $oENV;
+       if (defined $oENV) {
+               $ENV{'GIT_DIR'} = $oENV;
+       }
        return $retval;
 }
 
@@ -786,7 +787,7 @@ sub get_file_owner {
        }
        my $owner = $gcos;
        $owner =~ s/[,;].*$//;
-       return $owner;
+       return decode("utf8", $owner, Encode::FB_DEFAULT);
 }
 
 sub git_read_projects {
@@ -822,7 +823,7 @@ sub git_read_projects {
                        if (-e "$projectroot/$path/HEAD") {
                                my $pr = {
                                        path => $path,
-                                       owner => $owner,
+                                       owner => decode("utf8", $owner, Encode::FB_DEFAULT),
                                };
                                push @list, $pr
                        }
@@ -1024,7 +1025,7 @@ sub git_summary {
                        $pr = unescape($pr);
                        $ow = unescape($ow);
                        if ($pr eq $project) {
-                               $owner = $ow;
+                               $owner = decode("utf8", $ow, Encode::FB_DEFAULT);
                                last;
                        }
                }
@@ -2122,7 +2123,7 @@ sub git_history {
              "</div>\n";
        print "<div class=\"page_path\"><b>/" . esc_html($file_name) . "</b><br/></div>\n";
 
-       open my $fd, "-|", "$gitbin/git-rev-list $hash | $gitbin/git-diff-tree -r --stdin \'$file_name\'";
+       open my $fd, "-|", "$gitbin/git-rev-list $hash | $gitbin/git-diff-tree -r --stdin -- \'$file_name\'";
        my $commit;
        print "<table cellspacing=\"0\">\n";
        my $alternate = 0;
The core git plumbing