diff options
| author | Jeff King <peff@peff.net> | 2016-11-02 19:23:01 +0100 |
|---|---|---|
| committer | Junio C Hamano <gitster@pobox.com> | 2016-11-03 03:36:29 +0100 |
| commit | 4821494ebc0a86aea9ec50cc0f3168541467f3a1 (patch) | |
| tree | 1c630721fcf5b24c9adee5b12c770c508f010625 /t/t0021 | |
| parent | t0021: use $PERL_PATH for rot13-filter.pl (diff) | |
| download | git-4821494ebc0a86aea9ec50cc0f3168541467f3a1.tar.xz git-4821494ebc0a86aea9ec50cc0f3168541467f3a1.zip | |
t0021: fix filehandle usage on older perl
The rot13-filter.pl script calls methods on implicitly
defined filehandles (STDOUT, and the result of an open()
call). Prior to perl 5.13, these methods are not
automatically loaded, and perl will complain with:
Can't locate object method "flush" via package "IO::Handle"
Let's explicitly load IO::File (which inherits from
IO::Handle). That's more than we need for just "flush", but
matches what perl has done since:
http://perl5.git.perl.org/perl.git/commit/15e6cdd91beb4cefae4b65e855d68cf64766965d
Signed-off-by: Jeff King <peff@peff.net>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
Diffstat (limited to 't/t0021')
| -rw-r--r-- | t/t0021/rot13-filter.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/t/t0021/rot13-filter.pl b/t/t0021/rot13-filter.pl index e3ea58e1ed..4d5697ee51 100644 --- a/t/t0021/rot13-filter.pl +++ b/t/t0021/rot13-filter.pl @@ -21,6 +21,7 @@ use strict; use warnings; +use IO::File; my $MAX_PACKET_CONTENT_SIZE = 65516; my @capabilities = @ARGV; |