From 4821494ebc0a86aea9ec50cc0f3168541467f3a1 Mon Sep 17 00:00:00 2001 From: Jeff King Date: Wed, 2 Nov 2016 14:23:01 -0400 Subject: 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 Signed-off-by: Junio C Hamano --- t/t0021/rot13-filter.pl | 1 + 1 file changed, 1 insertion(+) 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; -- cgit v1.2.1