gitweb: Cleanup and uniquify error messages

Signed-off-by: Jakub Narebski <jnareb@gmail.com>
Signed-off-by: Junio C Hamano <junkio@cox.net>
This commit is contained in:
Jakub Narebski 2006-08-05 13:12:51 +02:00 committed by Junio C Hamano
parent dbd954a896
commit e484a2d6ad

View File

@ -1464,7 +1464,7 @@ sub git_blame2 {
die_error(undef, "Permission denied.") if (!git_get_project_config_bool ('blame')); die_error(undef, "Permission denied.") if (!git_get_project_config_bool ('blame'));
die_error('404 Not Found', "File name not defined") if (!$file_name); die_error('404 Not Found', "File name not defined") if (!$file_name);
$hash_base ||= git_read_head($project); $hash_base ||= git_read_head($project);
die_error(undef, "Reading commit failed") unless ($hash_base); die_error(undef, "Couldn't find base commit.") unless ($hash_base);
my %co = git_read_commit($hash_base) my %co = git_read_commit($hash_base)
or die_error(undef, "Reading commit failed"); or die_error(undef, "Reading commit failed");
if (!defined $hash) { if (!defined $hash) {
@ -1473,7 +1473,7 @@ sub git_blame2 {
} }
$ftype = git_get_type($hash); $ftype = git_get_type($hash);
if ($ftype !~ "blob") { if ($ftype !~ "blob") {
die_error("400 Bad Request", "object is not a blob"); die_error("400 Bad Request", "Object is not a blob");
} }
open ($fd, "-|", $GIT, "blame", '-l', $file_name, $hash_base) open ($fd, "-|", $GIT, "blame", '-l', $file_name, $hash_base)
or die_error(undef, "Open git-blame failed."); or die_error(undef, "Open git-blame failed.");
@ -1520,9 +1520,9 @@ sub git_blame2 {
sub git_blame { sub git_blame {
my $fd; my $fd;
die_error('403 Permission denied', "Permission denied.") if (!git_get_project_config_bool ('blame')); die_error('403 Permission denied', "Permission denied.") if (!git_get_project_config_bool ('blame'));
die_error('404 Not Found', "What file will it be, master?") if (!$file_name); die_error('404 Not Found', "File name not defined.") if (!$file_name);
$hash_base ||= git_read_head($project); $hash_base ||= git_read_head($project);
die_error(undef, "Reading commit failed.") unless ($hash_base); die_error(undef, "Couldn't find base commit.") unless ($hash_base);
my %co = git_read_commit($hash_base) my %co = git_read_commit($hash_base)
or die_error(undef, "Reading commit failed."); or die_error(undef, "Reading commit failed.");
if (!defined $hash) { if (!defined $hash) {
@ -2116,7 +2116,7 @@ sub git_commitdiff {
open my $fd, "-|", $GIT, "diff-tree", '-r', $hash_parent, $hash open my $fd, "-|", $GIT, "diff-tree", '-r', $hash_parent, $hash
or die_error(undef, "Open git-diff-tree failed."); or die_error(undef, "Open git-diff-tree failed.");
my @difftree = map { chomp; $_ } <$fd>; my @difftree = map { chomp; $_ } <$fd>;
close $fd or die_error(undef, "Reading diff-tree failed."); close $fd or die_error(undef, "Reading git-diff-tree failed.");
# non-textual hash id's can be cached # non-textual hash id's can be cached
my $expires; my $expires;
@ -2487,7 +2487,7 @@ sub git_rss {
open my $fd, "-|", $GIT, "rev-list", "--max-count=150", git_read_head($project) open my $fd, "-|", $GIT, "rev-list", "--max-count=150", git_read_head($project)
or die_error(undef, "Open git-rev-list failed."); or die_error(undef, "Open git-rev-list failed.");
my @revlist = map { chomp; $_ } <$fd>; my @revlist = map { chomp; $_ } <$fd>;
close $fd or die_error(undef, "Reading rev-list failed."); close $fd or die_error(undef, "Reading git-rev-list failed.");
print $cgi->header(-type => 'text/xml', -charset => 'utf-8'); print $cgi->header(-type => 'text/xml', -charset => 'utf-8');
print "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n". print "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n".
"<rss version=\"2.0\" xmlns:content=\"http://purl.org/rss/1.0/modules/content/\">\n"; "<rss version=\"2.0\" xmlns:content=\"http://purl.org/rss/1.0/modules/content/\">\n";