Correctly deal with slurpy hashes in Signature.ACCEPTS.

rakudo · Dec 8, 2015 · 62a029b · 62a029b
1 parent 2f0d38a
commit 62a029b
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/core/Signature.pm b/src/core/Signature.pm
@@ -58,7 +58,9 @@ my class Signature { # declared in BOOTSTRAP
         }
 
         my $here=$sclass{True}.SetHash;
-        my $hasslurpy=($sclass{True} // ()).grep({.slurpy}).Bool;
+        my $hasslurpy=($sclass{True} // ()).grep({.slurpy});
+        $here{$hasslurpy} :delete;
+        $hasslurpy .= Bool;
         for flat @($tclass{True} // ()) -> $other {
             my $this;