From: Eric Wong Date: Sat, 11 Jan 2020 22:34:58 +0000 (+0000) Subject: solver: path_a may be undef from /dev/null X-Git-Tag: v1.3.0~108 X-Git-Url: http://www.git.stargrave.org/?a=commitdiff_plain;ds=sidebyside;h=587cc7c14629a59fd39c9c5b991f0676217722e0;p=public-inbox.git solver: path_a may be undef from /dev/null This avoids uninitialized variable warnings when viewing newly-created files. --- diff --git a/lib/PublicInbox/SolverGit.pm b/lib/PublicInbox/SolverGit.pm index b48e8ac4..baad981d 100644 --- a/lib/PublicInbox/SolverGit.pm +++ b/lib/PublicInbox/SolverGit.pm @@ -169,7 +169,7 @@ sub extract_diff ($$) { my $patch = $9; # don't care for leading 'a/' and 'b/' - my (undef, @a) = split(m{/}, git_unquote($path_a)); + my (undef, @a) = split(m{/}, git_unquote($path_a)) if defined($path_a); my (undef, @b) = split(m{/}, git_unquote($path_b)); # get rid of path-traversal attempts and junk patches: @@ -177,7 +177,7 @@ sub extract_diff ($$) { state $bad_component = { map { $_ => 1 } ('', '.', '..') }; foreach (@a, @b) { return if $bad_component->{$_} } - $di->{path_a} = join('/', @a); + $di->{path_a} = join('/', @a) if @a; $di->{path_b} = join('/', @b); my $path = ++$self->{tot};