develooper Front page | perl.cvs.parrot | Postings from January 2009

[svn:parrot] r35454 - trunk/languages/perl6/src/parser

From:
infinoid
Date:
January 12, 2009 12:03
Subject:
[svn:parrot] r35454 - trunk/languages/perl6/src/parser
Message ID:
20090112200251.38917CB9F9@x12.develooper.com
Author: infinoid
Date: Mon Jan 12 12:02:50 2009
New Revision: 35454

Modified:
   trunk/languages/perl6/src/parser/actions.pm

Log:
[cage] Fix a t/codingstd/cuddled_else.t failure.

Modified: trunk/languages/perl6/src/parser/actions.pm
==============================================================================
--- trunk/languages/perl6/src/parser/actions.pm	(original)
+++ trunk/languages/perl6/src/parser/actions.pm	Mon Jan 12 12:02:50 2009
@@ -2119,7 +2119,8 @@
                 :namespace(@ns),
                 :scope('package')
             ));
-        } else {
+        }
+        else {
             if +@($past) == 0 && ($short_name eq 'print' || $short_name eq 'say') {
                 $/.panic($short_name ~ ' requires an argument');
             }



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About