branch : pmacs2
This commit is contained in:
moculus 2007-08-17 15:54:09 +00:00
parent e4da6ac546
commit c4027d9000
1 changed files with 14 additions and 9 deletions

View File

@ -202,6 +202,20 @@ class Perl(mode2.Fundamental):
closetokens = ('delimiter',) closetokens = ('delimiter',)
closetags = {')': '(', ']': '[', '}': '{'} closetags = {')': '(', ']': '[', '}': '{'}
colors = { colors = {
# comments
'comment': ('red', 'default'),
'endblock.start': ('red', 'default'),
'endblock.null': ('red', 'default'),
'endblock.end': ('red', 'default'),
# pod
'pod.start': ('red', 'default'),
'pod.null': ('red', 'default'),
'pod.entry.start': ('magenta', 'default'),
'pod.entry.null': ('magenta', 'default'),
'pod.entry.end': ('magenta', 'default'),
'pod.end': ('red', 'default'),
# basic stuff # basic stuff
'escaped': ('magenta', 'default'), 'escaped': ('magenta', 'default'),
'null': ('default', 'default'), 'null': ('default', 'default'),
@ -219,7 +233,6 @@ class Perl(mode2.Fundamental):
'deref': ('yellow', 'default'), 'deref': ('yellow', 'default'),
'hash': ('yellow', 'default'), 'hash': ('yellow', 'default'),
'hash_key': ('green', 'default'), 'hash_key': ('green', 'default'),
'comment': ('red', 'default'),
'function': ('cyan', 'default'), 'function': ('cyan', 'default'),
'builtin': ('magenta', 'default'), 'builtin': ('magenta', 'default'),
'method': ('cyan', 'default'), 'method': ('cyan', 'default'),
@ -239,14 +252,6 @@ class Perl(mode2.Fundamental):
'evaldoc.null': ('cyan', 'default'), 'evaldoc.null': ('cyan', 'default'),
'evaldoc.end': ('cyan', 'default'), 'evaldoc.end': ('cyan', 'default'),
# pod
'pod.start': ('red', 'default'),
'pod.null': ('red', 'default'),
'pod.entry.start': ('magenta', 'default'),
'pod.entry.null': ('magenta', 'default'),
'pod.entry.end': ('magenta', 'default'),
'pod.end': ('red', 'default'),
# strings # strings
'string.start': ('green', 'default'), 'string.start': ('green', 'default'),
'string.null': ('green', 'default'), 'string.null': ('green', 'default'),