Changeset 22506

Timestamp:

10/04/08 23:08:05 (7 weeks ago)

Author:

lwall

Message:

[STD] unbreak $obj.^foo

Files:

• src/perl6/STD.pm (modified) (1 diff)

src/perl6/STD.pm

@@ -992 +992 @@
 # doing fancy as one rule simplifies LTM
 token dotty:sym<.*> ( --> Methodcall) {
-    ('.' [<[+*?=:]>|'^!']) :: <.unspacey> <dottyop>
+    ('.' [ <[+*?=:]> | '^' '!'? ]) :: <.unspacey> <dottyop>
     { $<sym> = $0.item; }
 }