[PATCH] Work around a "Bizarre copy of ARRAY in sassign" with Perl 5.12.x
Niko Tyni
ntyni at debian.org
Mon May 24 18:27:56 UTC 2010
Test::Exception does nasty things with the stack, triggering
what seems to be a bug in newer Perl versions.
http://rt.perl.org/rt3/Public/Bug/Display.html?id=52610
https://rt.cpan.org/Ticket/Display.html?id=55179
http://bugs.debian.org/582915
Simplify the test as a workaround.
---
t/node.t | 4 ++--
1 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/t/node.t b/t/node.t
index 5ccabcd..6a59654 100644
--- a/t/node.t
+++ b/t/node.t
@@ -121,8 +121,8 @@ is($b->get_element_property(property => 'experience',element => 'X'),
is( $b->fetch_element_value('Z'), undef, "test Z value" );
-throws_ok {$b->fetch_element('Z','user')}
- qr/Unexpected experience/, "fetch_element with unexpected experience" ;
+eval {$b->fetch_element('Z','user')};
+like($@, qr/Unexpected experience/, "fetch_element with unexpected experience" );
# translated into beginner
throws_ok { $b->fetch_element('X','beginner'); }
--
1.7.1
--/9DWx/yDrRhgMJTb--
More information about the pkg-perl-maintainers
mailing list