d6
/
pmacs3
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fixed eol bug 

--HG--
branch : pmacs2
This commit is contained in:
moculus 2007-07-15 14:30:41 +00:00
parent 7d2f7d5a6c
commit 3a185647ff
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
code_examples/Reporting2.pm
View File

@ -2,6 +2,11 @@ package TBB::Reporting2;
my $bar =~ s/foob/blag/g; my $bar =~ s/foob/blag/g;
sub foo {
bar()
unless 9;
}
my $foo = { my $foo = {
'foo', 'foo',
'bar', 'bar',

1
mode_perl.py
View File

@ -150,6 +150,7 @@ class PerlTabber(tab2.StackTabber):
not fqname.startswith('heredoc') and not fqname.startswith('heredoc') and
not fqname.startswith('string') and not fqname.startswith('string') and
not fqname.startswith('endblock') and not fqname.startswith('endblock') and
not fqname == 'eol' and
not fqname == 'comment' and not fqname == 'comment' and
not fqname == 'null' and not fqname == 'null' and
token.string not in ('}', ';', '(', '{', '[', ',')): token.string not in ('}', ';', '(', '{', '[', ',')):