summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJunio C Hamano <gitster@pobox.com>2013-01-20 17:08:46 -0800
committerJunio C Hamano <gitster@pobox.com>2013-01-20 17:08:46 -0800
commita8033dfa6e61148db41e8ca30d659f859d949a67 (patch)
tree0a76637083a1cb43e24373ffae3df2d432bd15c5
parent28f04f34636f46f7848be9ce9b36cec6d3554f32 (diff)
parentcc3046271d6b832f0fd6d3f704c5f9f653d2b682 (diff)
downloadgit-a8033dfa6e61148db41e8ca30d659f859d949a67.tar.gz
Merge git://git.bogomips.org/git-svn
* git://git.bogomips.org/git-svn: git-svn: do not escape certain characters in paths
-rw-r--r--perl/Git/SVN/Editor.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl/Git/SVN/Editor.pm b/perl/Git/SVN/Editor.pm
index 178920c852..3db152155c 100644
--- a/perl/Git/SVN/Editor.pm
+++ b/perl/Git/SVN/Editor.pm
@@ -145,7 +145,8 @@ sub repo_path {
sub url_path {
my ($self, $path) = @_;
if ($self->{url} =~ m#^https?://#) {
- $path =~ s!([^~a-zA-Z0-9_./-])!uc sprintf("%%%02x",ord($1))!eg;
+ # characters are taken from subversion/libsvn_subr/path.c
+ $path =~ s#([^~a-zA-Z0-9_./!$&'()*+,-])#uc sprintf("%%%02x",ord($1))#eg;
}
$self->{url} . '/' . $self->repo_path($path);
}