| Subject: | Keyword::Simple seems to be injecting a line break somewhere |
Here's a failing test case.
| Subject: | line_numbering.t |
use strict;
use warnings;
use Test::More;
BEGIN {
package Some::Module;
use Keyword::Simple;
sub import {
Keyword::Simple::define 'provided', sub {
my ($ref) = @_;
substr($$ref, 0, 0) = 'if';
};
}
sub unimport {
Keyword::Simple::undefine 'provided';
}
$INC{'Some/Module.pm'} = __FILE__;
};
use Some::Module;
#line 23
provided (1) {
is(__LINE__, 24);
}
done_testing;