diff options
Diffstat (limited to 't/06-runtime.t')
-rw-r--r-- | t/06-runtime.t | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/t/06-runtime.t b/t/06-runtime.t index e8a18cc..d3c210f 100644 --- a/t/06-runtime.t +++ b/t/06-runtime.t @@ -34,6 +34,11 @@ use_ok_warnings( ['Bar::Conflicts', 'Bar::Quux::Bad', '0.01', '0.01'], ); +is(Bar::Foo->contents, "__DATA__ for Bar::Foo\n", "__DATA__ sections intact"); +is(Bar::Bar->contents, "__DATA__ for Bar::Bar\n", "__DATA__ sections intact"); +is(Bar::Baz->contents, "__DATA__ for Bar::Baz\n", "__DATA__ sections intact"); +is(Bar::Quux->contents, "__DATA__ for Bar::Quux\n", "__DATA__ sections intact"); + is(scalar(grep { ref($_) eq 'ARRAY' && @$_ > 1 && ref($_->[1]) eq 'HASH' } @INC), 1, |