diff options
| author | Michal Rokos <michal.rokos@nextsoft.cz> | 2006-07-08 17:32:04 +0200 |
|---|---|---|
| committer | Junio C Hamano <junkio@cox.net> | 2006-07-08 11:35:20 -0700 |
| commit | d9bffc08fd2cec626e3a390fa4cc47587a8c7f9e (patch) | |
| tree | 3ba87a20327aedec6fc29fd5db678d97e68c118f /git-fetch.sh | |
| parent | 6e959ab05a0a626f6805581a04dfc4e220054c02 (diff) | |
| download | git-d9bffc08fd2cec626e3a390fa4cc47587a8c7f9e.tar.gz git-d9bffc08fd2cec626e3a390fa4cc47587a8c7f9e.tar.xz | |
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-x | git-fetch.sh | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/git-fetch.sh b/git-fetch.sh index 48818f822..f80299daa 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; |