diff options
Diffstat (limited to 'contrib/checkSpace.pl')
-rwxr-xr-x | contrib/checkSpace.pl | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/contrib/checkSpace.pl b/contrib/checkSpace.pl index 435df10601..1589d723c8 100755 --- a/contrib/checkSpace.pl +++ b/contrib/checkSpace.pl @@ -4,22 +4,22 @@ for $fn (@ARGV) { open(F, "$fn"); $lastnil = 0; while (<F>) { - if (/\r/) { - print " CR:$fn:$.\n"; - } - if (/\t/) { - print " TAB:$fn:$.\n"; - } - if (/ +$/) { - print "Space\@EOL:$fn:$.\n"; - } - if ($lastnil && /^$/) { - print " DoubleNL:$fn:$.\n"; - } elsif (/^$/) { - $lastnil = 1; - } else { - $lastnil = 0; - } + if (/\r/) { + print " CR:$fn:$.\n"; + } + if (/\t/) { + print " TAB:$fn:$.\n"; + } + if (/ +$/) { + print "Space\@EOL:$fn:$.\n"; + } + if ($lastnil && /^$/) { + print " DoubleNL:$fn:$.\n"; + } elsif (/^$/) { + $lastnil = 1; + } else { + $lastnil = 0; + } } close(F); } |