Skip Menu |

This queue is for tickets about the XML-LibXML CPAN distribution.

Report information
The Basics
Id: 69435
Status: resolved
Priority: 0/
Queue: XML-LibXML

Owner: Nobody in particular
Requestors: TODDR [...]

Bug Information
Severity: (no value)
Broken in: 1.79
Fixed in: (no value)

Subject: 60error_prev_chain.t assumes $@ will be an object
Similar to case 69070. I've added a skip in the event I $@ is true but not a ref.
Subject: patch.txt
Download patch.txt
text/plain 592b
diff --git a/t/60error_prev_chain.t b/t/60error_prev_chain.t index 49d8b98..75fc4ca 100644 --- a/t/60error_prev_chain.t +++ b/t/60error_prev_chain.t @@ -10,7 +10,7 @@ use warnings; no warnings 'recursion'; -use Test::More tests => 1; +use Test::More; use XML::LibXML; @@ -28,6 +28,11 @@ use XML::LibXML; my $err = $@; my $count = 0; + if( $err && !ref($err) ) { + plan skip_all => 'The local libxml library does not support errors as objects to $@'; + } + plan tests => 1; + while (defined($err) && $count < 200) { $err = $err->_prev();
Download (untitled) / with headers
text/plain 144b
This test output is what the failure looks like. It's pretty nasty.
Download (untitled) / with headers
text/plain 125b
Hi Todd! Thanks for the report. This is fixed in the repository and will be uploaded to CPAN soon. Regards, -- Shlomi Fish

This service is sponsored and maintained by Best Practical Solutions and runs on infrastructure.

Please report any issues with to