From: Phillip Wood <phillip.wood@dunelm.org.uk>
Date: Fri, 30 Jun 2017 09:49:10 +0000 (+0100)
Subject: Git::unquote_path(): handle '\a'
X-Git-Tag: v2.13.4~4^2~2
X-Git-Url: https://git.lorimer.id.au/gitweb.git/diff_plain/4cebfac94412ccbd077c6776f7c8db1914bafde2?hp=--cc

Git::unquote_path(): handle '\a'

unquote_path() does not handle quoted paths containing '\a',
even though quote.c::unquote_c_style() does, and quote.c:sq_lookup[]
tells quote.c::sq_must_quote() that '\007' must be quoted as '\a'.

Signed-off-by: Phillip Wood <phillip.wood@dunelm.org.uk>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
---

4cebfac94412ccbd077c6776f7c8db1914bafde2
diff --git a/perl/Git.pm b/perl/Git.pm
index cf7a7e6a51..3179e6efb2 100644
--- a/perl/Git.pm
+++ b/perl/Git.pm
@@ -1461,6 +1461,7 @@ sub prefix_lines {
 
 {
 	my %cquote_map = (
+		"a" => chr(7),
 		"b" => chr(8),
 		"t" => chr(9),
 		"n" => chr(10),
@@ -1487,7 +1488,7 @@ sub prefix_lines {
 					$_ = $2;
 					last;
 				}
-				if (/^([\\\042btnvfr])(.*)$/) {
+				if (/^([\\\042abtnvfr])(.*)$/) {
 					$retval .= $cquote_map{$1};
 					$_ = $2;
 					last;