Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
add tests for RT #126100
  • Loading branch information
FROGGS committed Nov 21, 2015
1 parent 9e99d8c commit ff452eb
Showing 1 changed file with 8 additions and 3 deletions.
11 changes: 8 additions & 3 deletions S11-modules/require.t
Expand Up @@ -2,11 +2,16 @@ use v6;

use lib '.';

my $istrue = (require Test <&plan &is &lives-ok &skip &todo>);
my $required-Test = (require Test <&plan &is &lives-ok &skip &todo>);

plan 16;
plan 17;

is $istrue, True, "successful require returns True";
# RT #126100
{
is $required-Test.gist, '(Test)', "successful require PACKAGE returns PACKAGE";
is (require "t/spec/S11-modules/InnerModule.pm"), "t/spec/S11-modules/InnerModule.pm",
"successful require STRING returns STRING";
}

my $staticname;
BEGIN try EVAL '$staticname = Test';
Expand Down

0 comments on commit ff452eb

Please sign in to comment.