From: Craig A. Berry Date: Mon, 24 Feb 2014 02:47:07 +0000 (-0600) Subject: test nit in CPAN-Meta-YAML/t/31_local_tml.t X-Git-Tag: upstream/5.20.0~315 X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=cc53c151c97b77d2a76c3f8e71844983e62b3952;p=platform%2Fupstream%2Fperl.git test nit in CPAN-Meta-YAML/t/31_local_tml.t Directories on VMS have a .DIR extension. This test appears to be constructing method names from directory names, so we need to trim off the extension to get it to pass. Awaiting upstream application at: https://rt.cpan.org/Public/Bug/Display.html?id=93297 --- diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index bf8f48f..324034d 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -332,6 +332,11 @@ use File::Glob qw(:case); 't/04_scalar.t', # requires YAML.pm qr{^xt}, ], + # Waiting to be merged upstream: see CPAN RT#93297 + 'CUSTOMIZED' => [ + qw( t/31_local_tml.t + ), + ], }, 'Data::Dumper' => { diff --git a/cpan/CPAN-Meta-YAML/t/31_local_tml.t b/cpan/CPAN-Meta-YAML/t/31_local_tml.t index 0e62685..2339773 100644 --- a/cpan/CPAN-Meta-YAML/t/31_local_tml.t +++ b/cpan/CPAN-Meta-YAML/t/31_local_tml.t @@ -12,6 +12,7 @@ for my $dir ( IO::Dir->new($tml_local)->read ) { next if $dir =~ /^\./; my $fn = "test_$dir"; $fn =~ s/-/_/g; + $fn =~ s/\.DIR\z//i if $^O eq 'VMS'; my $bridge = TestBridge->can($fn); next unless $bridge; run_all_testml_files( "TestML", catdir($tml_local, $dir), $bridge ); diff --git a/t/porting/customized.dat b/t/porting/customized.dat index c114a87..6a9ae64 100644 --- a/t/porting/customized.dat +++ b/t/porting/customized.dat @@ -1,5 +1,4 @@ -Config::Perl::V cpan/Config-Perl-V/t/20_plv510.t 7263a40dcbaf1ee447f0209d3bbc029cc747c959 -Config::Perl::V cpan/Config-Perl-V/t/21_plv518.t ec23f4e34fb2f84f63f5588ad4a577530dbef5d2 +CPAN::Meta::YAML cpan/CPAN-Meta-YAML/t/31_local_tml.t cf319f3129942411237125f0d92a224184375209 Digest::MD5 cpan/Digest-MD5/t/files.t bdbe05b705d9da305fedce7a9f4b6ba63250c7cf Module::Build cpan/Module-Build/lib/Module/Build/ConfigData.pm 85eb9656e68d1f256737dc52d86b5d0fed28f832 PerlIO::via::QuotedPrint cpan/PerlIO-via-QuotedPrint/t/QuotedPrint.t ca39f0146e89de02c746e199c45dcb3e5edad691