We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 9e99d8c commit ff452ebCopy full SHA for ff452eb
S11-modules/require.t
@@ -2,11 +2,16 @@ use v6;
2
3
use lib '.';
4
5
-my $istrue = (require Test <&plan &is &lives-ok &skip &todo>);
+my $required-Test = (require Test <&plan &is &lives-ok &skip &todo>);
6
7
-plan 16;
+plan 17;
8
9
-is $istrue, True, "successful require returns True";
+# RT #126100
10
+{
11
+ is $required-Test.gist, '(Test)', "successful require PACKAGE returns PACKAGE";
12
+ is (require "t/spec/S11-modules/InnerModule.pm"), "t/spec/S11-modules/InnerModule.pm",
13
+ "successful require STRING returns STRING";
14
+}
15
16
my $staticname;
17
BEGIN try EVAL '$staticname = Test';
0 commit comments