diff options
| author | Georg Brandl <georg@python.org> | 2014-01-09 15:44:54 +0100 |
|---|---|---|
| committer | Georg Brandl <georg@python.org> | 2014-01-09 15:44:54 +0100 |
| commit | 3da17ee62e9f35316cbfa573143ce96d5d525c59 (patch) | |
| tree | 3aa5b10e63e2e3889fc9dec2d36ab9d04d8a0f93 /pygments | |
| parent | 87b4aae95eef06b8b7c5841d69b544c8ff2434ee (diff) | |
| download | pygments-3da17ee62e9f35316cbfa573143ce96d5d525c59.tar.gz | |
backout cda25e0e1d5e
Diffstat (limited to 'pygments')
| -rw-r--r-- | pygments/lexers/agile.py | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/pygments/lexers/agile.py b/pygments/lexers/agile.py index 9dc7c459..9ae71b3a 100644 --- a/pygments/lexers/agile.py +++ b/pygments/lexers/agile.py @@ -1941,7 +1941,7 @@ class Perl6Lexer(ExtendedRegexLexer): mimetypes = ['text/x-perl6', 'application/x-perl6'] flags = re.MULTILINE | re.DOTALL | re.UNICODE - PERL6_IDENTIFIER_RANGE = "['a-zA-Z0-9_:-]" # if you alter this, search for a copy made of it below + PERL6_IDENTIFIER_RANGE = "['a-zA-Z0-9_:-]" PERL6_KEYWORDS = ( 'BEGIN', 'CATCH', 'CHECK', 'CONTROL', 'END', 'ENTER', 'FIRST', 'INIT', @@ -2282,10 +2282,6 @@ class Perl6Lexer(ExtendedRegexLexer): return 0.91 if re.search(r'sub\s+\w+:\w*[^a-zA-Z0-9{(: ]', text): # Special sub/method syntax (ex. sub postcircumfix:<[ ]>) return 0.91 - # XXX I don't like the copy+pasting of PERL6_IDENTIFIER_RANGE from above, but I don't know how to access it - # otherwise - if re.search(r'my\s+[\'a-zA-Z0-9_:-]+\s+[$@%(]', text): # my TYPE [$scalar|@array|%hash|($list, $of, $vars)] - return 0.91 for line in text.splitlines(): if re.match(r'\s*(?:my|our)?\s*module', line): # module declarations |