[PATCH] change Perl syntax to support Perl 5.6
- From
Robert Schiele <rschiele@gmail.com>
- Date
- Aug 30, 2008, 17:39 UTC
- Message-ID
- <20080830173947.GF7185@schiele.dyndns.org>
git-add--interactive has one Perl command that was not yet present in Perl 5.6. Changing this single command makes it compatible again.
Signed-off-by: Robert Schiele <rschiele@gmail.com> --- This is an alternative to my previous patch that just declared Perl 5.8 to be the required version.
git-add--interactive.perl | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/git-add--interactive.perl b/git-add--interactive.perl index da768ee..777ec5f 100755 --- a/git-add--interactive.perl +++ b/git-add--interactive.perl @@ -61,7 +61,7 @@ sub run_cmd_pipe { return qx{@args}; } else { my $fh = undef; - open($fh, '-|', @_) or die; + open($fh, '-|', join(' ', @_)) or die; return <$fh>; } }
-- 1.5.4.5