On Jun 19 2020, brian m. carlson wrote:
> diff --git a/t/lib-git-svn.sh b/t/lib-git-svn.sh
> index 7d248e6588..4780b45337 100644
> --- a/t/lib-git-svn.sh
> +++ b/t/lib-git-svn.sh
> @@ -78,29 +78,30 @@ maybe_start_httpd () {
> }
>
> convert_to_rev_db () {
> - perl -w -- - "$@" <<\EOF
> -use strict;
> + perl -w -e "use strict; my \$oidlen = $(test_oid rawsz);" -e '
$(test_oid rawsz) could be passed as an additional argument.
perl -w -- - "$(test_oid rawsz)" "$@" <<\EOF
use strict;
my $oidlen = shift;
...
EOF
Andreas.
--
Andreas Schwab, schwab@xxxxxxxxxxxxxx
GPG Key fingerprint = 7578 EB47 D4E5 4D69 2510 2552 DF73 E780 A9DA AEC1
"And now for something completely different."
