summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRob Hoelz <rob@hoelz.ro>2014-01-20 18:38:09 +0100
committerRob Hoelz <rob@hoelz.ro>2014-01-20 18:38:09 +0100
commit8135b6cbd5a69c40b28e5ad5f29313d93a7b3465 (patch)
tree76762abfb2bb82f6a8a86200652ae7f8ffd52e3c
parentdfdc916106cfdf79624adbe9687642145c101356 (diff)
downloadpygments-8135b6cbd5a69c40b28e5ad5f29313d93a7b3465.tar.gz
Perl 6: Make sure we don't step back when looking for a closing delimiter
-rw-r--r--pygments/lexers/agile.py4
1 files changed, 4 insertions, 0 deletions
diff --git a/pygments/lexers/agile.py b/pygments/lexers/agile.py
index 721586a1..65826e0a 100644
--- a/pygments/lexers/agile.py
+++ b/pygments/lexers/agile.py
@@ -2125,6 +2125,10 @@ class Perl6Lexer(ExtendedRegexLexer):
end_pos = next_close_pos
+ if end_pos < 0: # if we didn't find a closer, just highlight the
+ # rest of the text in this class
+ end_pos = len(text)
+
if adverbs is not None and re.search(r':to\b', adverbs):
heredoc_terminator = text[match.start('delimiter') + n_chars : end_pos]
end_heredoc = re.search(r'^\s*' + re.escape(heredoc_terminator) + r'\s*$', text[ match.end('delimiter') : ], re.MULTILINE)