[svn:mod_parrot] r408 - mod_parrot/trunk/languages/perl6/lib

[email protected] Mon, 4 Aug 2008 15:25:53 -0700 (PDT)
Newsgroups perl.cvs.mod_parrot
Message-ID <[email protected]>
Author: jhorwitz
Date: Mon Aug  4 15:25:52 2008
New Revision: 408

Modified:
   mod_parrot/trunk/languages/perl6/lib/mod_perl6.pm

Log:
use "return" statement now that rakudo supports it


Modified: mod_parrot/trunk/languages/perl6/lib/mod_perl6.pm
==============================================================================
--- mod_parrot/trunk/languages/perl6/lib/mod_perl6.pm	(original)
+++ mod_parrot/trunk/languages/perl6/lib/mod_perl6.pm	Mon Aug  4 15:25:52 2008
@@ -33,6 +33,5 @@
     my $r = $ctx.request_rec();
     load($handler);
     my $status = ::($handler)::handler($r);
-    # return $status;
-    $status;
+    return $status;
 }