Permalink
Browse files

Apply patch from cognominal++ to implement Capture.perl.

  • Loading branch information...
1 parent dd6bda0 commit 406d85f4cdcd61b78f1e6023da1f41f5658f479d @jnthn jnthn committed Jun 19, 2010
Showing with 6 additions and 0 deletions.
  1. +1 −0 build/Makefile.in
  2. +5 −0 src/core/Capture.pm
View
1 build/Makefile.in
@@ -226,6 +226,7 @@ CORE_SOURCES = \
src/core/Attribute.pm \
src/core/CallFrame.pm \
src/core/LexPad.pm \
+ src/core/Capture.pm \
src/core/MAIN.pm \
src/core/YOU_ARE_HERE.pm \
View
5 src/core/Capture.pm
@@ -0,0 +1,5 @@
+augment class Capture {
+ method perl {
+ '\(' ~ join(', ', @(self)>>.perl, %(self)>>.perl ) ~ ')'
+ }
+}

0 comments on commit 406d85f

Please sign in to comment.