aboutsummaryrefslogtreecommitdiff
path: root/perl/Git/SVN.pm
diff options
context:
space:
mode:
authorJunio C Hamano <gitster@pobox.com>2013-01-25 12:53:31 -0800
committerJunio C Hamano <gitster@pobox.com>2013-01-25 12:53:31 -0800
commit50a6b54c03219ad74b9f3f839e0321be18daeaf6 (patch)
tree6919b4b808d350f68bf80636a778c1b1a4f36f47 /perl/Git/SVN.pm
parent3587b513bafd7a83d8c816ac1deed72b5e3a27e9 (diff)
parentbc93ceb7c5ec959ad275f575a3c49ff491337a8b (diff)
downloadgit-50a6b54c03219ad74b9f3f839e0321be18daeaf6.tar.gz
git-50a6b54c03219ad74b9f3f839e0321be18daeaf6.tar.xz
Merge branch 'for-junio' of git://bogomips.org/git-svn
* 'for-junio' of git://bogomips.org/git-svn: git-svn: Simplify calculation of GIT_DIR git-svn: cleanup sprintf usage for uppercasing hex
Diffstat (limited to 'perl/Git/SVN.pm')
-rw-r--r--perl/Git/SVN.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl/Git/SVN.pm b/perl/Git/SVN.pm
index 59215fa86..490e33038 100644
--- a/perl/Git/SVN.pm
+++ b/perl/Git/SVN.pm
@@ -490,7 +490,7 @@ sub refname {
#
# Additionally, % must be escaped because it is used for escaping
# and we want our escaped refname to be reversible
- $refname =~ s{([ \%~\^:\?\*\[\t])}{uc sprintf('%%%02x',ord($1))}eg;
+ $refname =~ s{([ \%~\^:\?\*\[\t])}{sprintf('%%%02X',ord($1))}eg;
# no slash-separated component can begin with a dot .
# /.* becomes /%2E*
@@ -2377,7 +2377,7 @@ sub map_path {
sub uri_encode {
my ($f) = @_;
- $f =~ s#([^a-zA-Z0-9\*!\:_\./\-])#uc sprintf("%%%02x",ord($1))#eg;
+ $f =~ s#([^a-zA-Z0-9\*!\:_\./\-])#sprintf("%%%02X",ord($1))#eg;
$f
}