diff options
author | Richard Leach <rich+perl@hyphen-dash-hyphen.info> | 2019-05-19 20:16:41 +0000 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2019-05-24 17:09:30 -0600 |
commit | a04a75f20f03aa08ce8118b3b0b3f93eb3e997c5 (patch) | |
tree | 7dc212b8de899ed25eca94edb15b8e62472a5d50 /t/loc_tools.pl | |
parent | 01b91050db552dbb89e4bd2eb6d089ebd0f28c1e (diff) | |
download | perl-a04a75f20f03aa08ce8118b3b0b3f93eb3e997c5.tar.gz |
PATCH: [perl #134117] Close DATA in loc_tools.pl
This prevents unexpected text in lib/warnings.t
Diffstat (limited to 't/loc_tools.pl')
-rw-r--r-- | t/loc_tools.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/loc_tools.pl b/t/loc_tools.pl index c76e29388a..beebd98d88 100644 --- a/t/loc_tools.pl +++ b/t/loc_tools.pl @@ -421,7 +421,7 @@ sub find_locales ($;$) { } # The rest of the locales are in this file. - push @Data, <DATA>; + push @Data, <DATA>; close DATA; foreach my $line (@Data) { my ($locale_name, $language_codes, $country_codes, $encodings) = |