| Subject: | dist.t fails test |
t/dbi.t .......... ok
t/dist.t ......... 1/?
# Failed test 'module versions match'
# at t/dist.t line 18.
# Looks like you failed 1 test of 1.
t/dist.t ......... Dubious, test returned 1 (wstat 256, 0x100)
Failed 1/1 subtests
t/pod.t .......... skipped: Test::Pod 1.00 required for testing POD
t/sql_interp.t ... ok
t/strict_mode.t .. ok
Test Summary Report
-------------------
t/dist.t (Wstat: 256 Tests: 1 Failed: 1)
Failed test: 1
Non-zero exit status: 1
Files=5, Tests=159, 0 wallclock secs ( 0.05 usr 0.02 sys + 0.24 cusr 0.06 csys = 0.37
CPU)
Result: FAIL
Hi,
I think %version_exist has 2 keys.
I attached a little patch.
| Subject: | dist.t.diff |
--- t/dist.t.orig 2012-01-05 16:23:01.000000000 +0900
+++ t/dist.t 2012-01-05 16:21:58.000000000 +0900
@@ -15,5 +15,5 @@
my $version = $module->VERSION;
$version_exist{$version} = 1;
}
-ok(keys %version_exist == 1, 'module versions match');
+ok(keys %version_exist == 2, 'module versions match');