Fix missing $*W, spotted by cygx++

rakudo · Oct 17, 2015 · c8b4897 · c8b4897
1 parent c589177
commit c8b4897
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Perl6/Grammar.nqp b/src/Perl6/Grammar.nqp
@@ -1508,7 +1508,7 @@ grammar Perl6::Grammar is HLL::Grammar does STD {
         | <version> [
                     ||  <?{ $<version><vnum>[0] == 5 }> {
                             my $module := $*W.load_module($/, 'Perl5', {}, $*GLOBALish);
-                            do_import($/, $module, 'Perl5');
+                            $*W.do_import($/, $module, 'Perl5');
                             $/.CURSOR.import_EXPORTHOW($/, $module);
                         }
                     ||  <?{ $<version><vnum>[0] == 6 }> {