flatten export trait list, like we do for Routines

rakudo · Sep 10, 2015 · 75665e3 · 75665e3
1 parent 93bb1ae
commit 75665e3
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/core/Variable.pm b/src/core/Variable.pm
@@ -90,9 +90,9 @@ multi sub trait_mod:<is>(Variable:D $v, :$export!) {
         );
     }
     my $var  := $v.var;
-    my @tags = 'ALL', (nqp::istype($export,Pair) ?? $export.key() !!
-                       nqp::istype($export,Positional) ?? @($export)>>.key !!
-                       'DEFAULT');
+    my @tags = flat 'ALL', (nqp::istype($export,Pair) ?? $export.key() !!
+                            nqp::istype($export,Positional) ?? @($export)>>.key !!
+                            'DEFAULT');
     EXPORT_SYMBOL($var.VAR.name, @tags, $var);
 }