Permalink
Browse files

nom variable interpolation in regexes working again.

  • Loading branch information...
1 parent 06da21b commit 67d3b83c79ca55a3ca932293c122a21a26ce312e @supernovus committed Sep 28, 2011
Showing with 9 additions and 7 deletions.
  1. +9 −7 lib/Exemel.pm
View
@@ -252,14 +252,16 @@ class Exemel::Element does Exemel {
else {
## Temporary hack until Rakudo's variable interpolation is
## working again in RegExes.
- if $node.name ~~ / ^ (\w+) ':' / {
- if $0.Str ne $prefix { $matched = False; }
- }
- else {
- $matched = False;
- }
+ #if $node.name ~~ / ^ (\w+) ':' / {
+ # if $0.Str ne $prefix { $matched = False; }
+ # }
+ #else {
+ # $matched = False;
+ #}
## Re-enable this code once variable interpolation is fixed.
- #if $node.name !~~ / ^ $prefix ':' / { $matched = False; }
+ ## It seems to be working again, so I've re-enabled this.
+ ## TODO: remove the above hackage in next release.
+ if $node.name !~~ / ^ $prefix ':' / { $matched = False; }
}
}

0 comments on commit 67d3b83

Please sign in to comment.