projects
/
gitmo/Moo.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Bring back 5.8.1 support
[gitmo/Moo.git]
/
t
/
load_module.t
1
# work around RT#67692
2
use Moo::_Utils;
3
use strictures 1;
4
5
use Test::More;
6
7
local @INC = (sub {
8
return unless $_[1] eq 'Foo/Bar.pm';
9
my $source = "package Foo::Bar; sub baz { 1 } 1";
10
open my $fh, '<', \$source;
11
$fh;
12
}, @INC);
13
14
{ package Foo::Bar::Baz; sub quux { } }
15
16
_load_module("Foo::Bar");
17
18
ok(eval { Foo::Bar->baz }, 'Loaded module ok');
19
20
done_testing;