Permalink
Browse files

Propose $[*-1] instead of invalid $-1.

  • Loading branch information...
1 parent 1ab8225 commit 27570f6a219c1458e8dda04efc6be48fe394de8f @xfix xfix committed Sep 15, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 STD.pm6
View
@@ -2313,7 +2313,7 @@ grammar P6 is STD {
when 'UNICODE' { $repl = '$?UNICODE' } # XXX ???
when 'TAINT' { $repl = '$*TAINT' }
when 'OPEN' { $repl = 'filehandle introspection' }
- when 'N' { $repl = '$-1' } # XXX ???
+ when 'N' { $repl = '$[*-1]' }
when 'L' { $repl = 'Form module' }
when 'A' { $repl = 'Form module' }
when 'E' { $repl = '$!.extended_os_error' }

0 comments on commit 27570f6

Please sign in to comment.