summaryrefslogtreecommitdiff
path: root/git-fetch.sh
diff options
context:
space:
mode:
authorMichal Rokos <michal.rokos@nextsoft.cz>2006-07-08 15:32:04 (GMT)
committerJunio C Hamano <junkio@cox.net>2006-07-08 18:35:20 (GMT)
commitd9bffc08fd2cec626e3a390fa4cc47587a8c7f9e (patch)
tree3ba87a20327aedec6fc29fd5db678d97e68c118f /git-fetch.sh
parent6e959ab05a0a626f6805581a04dfc4e220054c02 (diff)
downloadgit-d9bffc08fd2cec626e3a390fa4cc47587a8c7f9e.zip
git-d9bffc08fd2cec626e3a390fa4cc47587a8c7f9e.tar.gz
git-d9bffc08fd2cec626e3a390fa4cc47587a8c7f9e.tar.bz2
Using 'perl' in *.sh
Some GIT's shell script are using bare 'perl' for perl invocation. Use @@PERL@@ symbol and replace it with PERL_PATH_SQ everywhere. Signed-off-by: Michal Rokos <michal.rokos@nextsoft.cz> Signed-off-by: Junio C Hamano <junkio@cox.net>
Diffstat (limited to 'git-fetch.sh')
-rwxr-xr-xgit-fetch.sh2
1 files changed, 1 insertions, 1 deletions
diff --git a/git-fetch.sh b/git-fetch.sh
index 48818f8..f80299d 100755
--- a/git-fetch.sh
+++ b/git-fetch.sh
@@ -278,7 +278,7 @@ fetch_main () {
head="ref: $remote_name"
while (expr "z$head" : "zref:" && expr $depth \< $max_depth) >/dev/null
do
- remote_name_quoted=$(perl -e '
+ remote_name_quoted=$(@@PERL@@ -e '
my $u = $ARGV[0];
$u =~ s/^ref:\s*//;
$u =~ s{([^-a-zA-Z0-9/.])}{sprintf"%%%02x",ord($1)}eg;