diff options
author | Michael Cummings <mcummings@gentoo.org> | 2006-09-11 21:33:37 +0000 |
---|---|---|
committer | Michael Cummings <mcummings@gentoo.org> | 2006-09-11 21:33:37 +0000 |
commit | 90bbe1a76465f0e6b698b05e11e7f5a46381ec38 (patch) | |
tree | bd33119038935af613de41d7378a0b2006ecc299 /dev-perl/Devel-Size/files | |
parent | Version bump to 0.10.1. Bug #135667 (diff) | |
download | gentoo-2-90bbe1a76465f0e6b698b05e11e7f5a46381ec38.tar.gz gentoo-2-90bbe1a76465f0e6b698b05e11e7f5a46381ec38.tar.bz2 gentoo-2-90bbe1a76465f0e6b698b05e11e7f5a46381ec38.zip |
Patch for tests, affects only tests on amd64
(Portage version: 2.1.1_rc1-r3)
Diffstat (limited to 'dev-perl/Devel-Size/files')
-rw-r--r-- | dev-perl/Devel-Size/files/Devel-Size-test-fix.patch | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/dev-perl/Devel-Size/files/Devel-Size-test-fix.patch b/dev-perl/Devel-Size/files/Devel-Size-test-fix.patch new file mode 100644 index 000000000000..56e2321d6078 --- /dev/null +++ b/dev-perl/Devel-Size/files/Devel-Size-test-fix.patch @@ -0,0 +1,24 @@ +diff -ruN Devel-Size-0.64/t/basic.t Devel-Size-0.64_a/t/basic.t +--- Devel-Size-0.64/t/basic.t 2004-11-27 22:40:31.000000000 +0100 ++++ Devel-Size-0.64_a/t/basic.t 2006-09-09 18:49:12.000000000 +0200 +@@ -24,17 +24,17 @@ + %foo = (a => 1, b => 2); + + my $x = "A string"; +-my $y = "A longer string"; ++my $y = "A much much longer string"; + if (size($x) < size($y)) { + print "ok 2\n"; + } else { +- print "not ok 2\n"; ++ print "not ok 2 # " . size($x) . " not < than " . size($y) . "\n"; + } + + if (total_size($x) < total_size($y)) { + print "ok 3\n"; + } else { +- print "not ok 3\n"; ++ print "not ok 3 # " . total_size($x) . " not < than " . total_size($y) . "\n"; + } + + my @x = (1..4); |