pass around %chosen in load_module

Since the module loader in CUR intercept the Perl6::ModuleLoader, we are supposed to pass along what we got in. skids++ for finding it.
rakudo · Mar 26, 2015 · 59f7cb9 · 59f7cb9
1 parent 0730963
commit 59f7cb9
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/core/CompUnitRepo.pm b/src/core/CompUnitRepo.pm
@@ -30,10 +30,9 @@ class CompUnitRepo {
 
     method p6ml { $p6ml }
 
-    method load_module($module_name, %opts, *@GLOBALish is rw, :$line, :$file) {
+    method load_module($module_name, %opts, *@GLOBALish is rw, :$line, :$file, :%chosen) {
         $lock.protect( {
         my $candi = self.candidates($module_name, :auth(%opts<auth>), :ver(%opts<ver>))[0];
-        my %chosen;
         if $candi {
             %chosen<pm>   :=
               $candi<provides>{$module_name}<pm><file> //