checkpatch: perform indent checks on perl
So that we eat our own dog food ensure the indent checks apply to perl too. Signed-off-by: Andy Whitcroft <apw@shadowen.org> Signed-off-by: Andrew Morton <akpm@linux-foundation.org> Signed-off-by: Linus Torvalds <torvalds@linux-foundation.org>
This commit is contained in:
parent
f055663c58
commit
b9ea10d691
1 changed files with 5 additions and 2 deletions
|
@ -1266,8 +1266,8 @@ sub process {
|
|||
WARN("adding a line without newline at end of file\n" . $herecurr);
|
||||
}
|
||||
|
||||
# check we are in a valid source file *.[hc] if not then ignore this hunk
|
||||
next if ($realfile !~ /\.[hc]$/);
|
||||
# check we are in a valid source file C or perl if not then ignore this hunk
|
||||
next if ($realfile !~ /\.(h|c|pl)$/);
|
||||
|
||||
# at the beginning of a line any tabs must come first and anything
|
||||
# more than 8 must use tabs.
|
||||
|
@ -1277,6 +1277,9 @@ sub process {
|
|||
ERROR("code indent should use tabs where possible\n" . $herevet);
|
||||
}
|
||||
|
||||
# check we are in a valid C source file if not then ignore this hunk
|
||||
next if ($realfile !~ /\.(h|c)$/);
|
||||
|
||||
# check for RCS/CVS revision markers
|
||||
if ($rawline =~ /^\+.*\$(Revision|Log|Id)(?:\$|)/) {
|
||||
WARN("CVS style keyword markers, these will _not_ be updated\n". $herecurr);
|
||||
|
|
Loading…
Reference in a new issue