Skip Menu |
 

This queue is for tickets about the indirect CPAN distribution.

Report information
The Basics
Id: 88428
Status: resolved
Priority: 0/
Queue: indirect

People
Owner: Nobody in particular
Requestors: haarg [...] haarg.org
Cc:
AdminCc:

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



Subject: no indirect in eval can trigger for direct calls on __PACKAGE__
Download (untitled) / with headers
text/plain 222b
Inside a string eval, using a direct call on __PACKAGE__ will trigger indirect warnings if the package name is included anywhere in the eval text after the method call. Attached is a test case that demonstrates the issue.
Subject: indirect-eval-bug.t
Download indirect-eval-bug.t
text/x-perl 417b
use strict; use warnings; use Test::More; use Test::Fatal; eval <<'END_CODE'; no indirect 'fatal'; package Welp; __PACKAGE__->can(1); END_CODE is $@, '', 'no exception with fatal+package name not in eval text somewhere'; eval <<'END_CODE'; no indirect 'fatal'; package Welp; __PACKAGE__->can(1); # Welp END_CODE is $@, '', 'no exception with fatal+package name in eval text somewhere'; done_testing;
Hello to you too, This has been fixed in indirect 0.31. Thanks for your report. Vincent


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.