summaryrefslogtreecommitdiff
path: root/gitweb
diff options
context:
space:
mode:
authorØyvind A. Holm <sunny@sunbase.org>2016-01-12 03:31:56 (GMT)
committerJunio C Hamano <gitster@pobox.com>2016-01-12 21:21:15 (GMT)
commita9eb90aab5922e08a26c439806c80faa80f7c26d (patch)
tree76b9d6ab005a90a74ebc09667c5fdecbb41ebe57 /gitweb
parenta2558fb8e1e387b630312311e1d22c95663da5d0 (diff)
downloadgit-a9eb90aab5922e08a26c439806c80faa80f7c26d.zip
git-a9eb90aab5922e08a26c439806c80faa80f7c26d.tar.gz
git-a9eb90aab5922e08a26c439806c80faa80f7c26d.tar.bz2
gitweb: squelch "uninitialized value" warning
git_object() chomps $type that is read from "cat-file -t", but it does so before checking if $type is defined, resulting in a Perl warning in the server error log: gitweb.cgi: Use of uninitialized value $type in scalar chomp at [...]/gitweb.cgi line 7579., referer: [...] when trying to access a non-existing commit, for example: http://HOST/?p=PROJECT.git;a=commit;h=NON_EXISTING_COMMIT Check the value in $type before chomping. This will cause us to call href with its action parameter set to undef when formulating the URL to redirect to, but that is harmless, as the function treats a parameter that set to undef as if it does not exist. Signed-off-by: Øyvind A. Holm <sunny@sunbase.org> Signed-off-by: Junio C Hamano <gitster@pobox.com>
Diffstat (limited to 'gitweb')
-rwxr-xr-xgitweb/gitweb.perl2
1 files changed, 1 insertions, 1 deletions
diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl
index 7a5b23a..05d7910 100755
--- a/gitweb/gitweb.perl
+++ b/gitweb/gitweb.perl
@@ -7576,7 +7576,7 @@ sub git_object {
git_cmd(), 'cat-file', '-t', $object_id) . ' 2> /dev/null'
or die_error(404, "Object does not exist");
$type = <$fd>;
- chomp $type;
+ defined $type && chomp $type;
close $fd
or die_error(404, "Object does not exist");