vim/syntastic
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Merge pull request #275 from eharmon/master

Browse Source 
Fix merge error in the perl checker
This commit is contained in:
Martin Grenfell 2012-07-01 14:38:29 -07:00
commit f75fbc82dc
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
syntax_checkers/efm_perl.pl
View File

@ -114,7 +114,7 @@ foreach my $line (@lines) {
chomp($line); chomp($line);
my ($file, $lineno, $message, $rest, $severity); my ($file, $lineno, $message, $rest, $severity);
if ($line =~ /^(.*)\sat\s(.*)\sline\s(\d+)(.*)$/) { if ($line =~ /^([EW]):(.*)\sat\s(.*)\sline\s(\d+)(.*)$/) {
($severity, $message, $file, $lineno, $rest) = ($1, $2, $3, $4, $5); ($severity, $message, $file, $lineno, $rest) = ($1, $2, $3, $4, $5);
$errors++; $errors++;
$message .= $rest if ($rest =~ s/^,//); $message .= $rest if ($rest =~ s/^,//);