Skip Menu |
 

This queue is for tickets about the Basset CPAN distribution.

Report information
The Basics
Id: 87233
Status: new
Priority: 0/
Queue: Basset

People
Owner: Nobody in particular
Requestors: rurban [...] x-ray.at
Cc:
AdminCc:

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

Attachments


Subject: [PATCH] wrong return precedence
Download (untitled) / with headers
text/plain 133b
returns binds stronger than or, so the expressions after or are ignored. See https://rt.perl.org/rt3/Public/Bug/Display.html?id=59802
Subject: Basset-1.04-returnor.patch
diff -bu Basset-1.04-SzZs0v/lib/Basset/Machine.pm~ Basset-1.04-SzZs0v/lib/Basset/Machine.pm --- Basset-1.04-SzZs0v/lib/Basset/Machine.pm~ 2006-04-27 16:21:43.000000000 -0500 +++ Basset-1.04-SzZs0v/lib/Basset/Machine.pm 2013-07-23 17:21:23.178008185 -0500 @@ -485,7 +485,7 @@ my $self = shift; my $extractor = $self->extractor or return $self->error("Cannot extract w/o extractor", "XXX"); - return $extractor->extract(@_) or $self->error($extractor->errvals); + return $extractor->extract(@_) || $self->error($extractor->errvals); } =pod


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

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.