Due to issues with the Internet.ee domain registry, our main domain, paste.ee, is currently disabled due to abuse reports. We are looking into alternative domains to continue operation, but for now the pastee.dev domain is the primary domain.
If you wish to blame someone, blame the scum using this site as a malware host.
Submitted on April 5, 2013 at 02:31 AM

Download - Report

Section 1 (Text)

12345678910111213141516171819202122 
diff --git a/src/core/Parcel.pm b/src/core/Parcel.pm
index f695d7b..d716443 100644
--- a/src/core/Parcel.pm
+++ b/src/core/Parcel.pm
@@ -49,7 +49,7 @@ my class Parcel does Positional {
 
     multi method perl(Parcel:D \SELF:) {
         my Mu $rpa := nqp::clone($!storage);
-        my $perl = nqp::iscont(SELF) ?? '$(' !! '(';
+        my $perl = '(';
         if $rpa {
             $perl = $perl ~ nqp::shift($rpa).perl;
             if $rpa {
@@ -59,7 +59,7 @@ my class Parcel does Positional {
                 $perl = $perl ~ ',';
             }
         }
-        $perl ~ ')';
+        $perl ~ nqp::iscont(SELF) ?? ').item' !! ')';
     }
 
     method STORE(|) {