aboutsummaryrefslogtreecommitdiff
path: root/scripts/headers_check.pl
diff options
context:
space:
mode:
authorIngo Molnar <mingo@elte.hu>2008-11-03 08:57:41 +0100
committerIngo Molnar <mingo@elte.hu>2008-11-03 08:57:41 +0100
commitdb5935001a43528e673ad26ffec9d98c60a496a9 (patch)
tree8e735327a97beccabb5d94ef93df25d2bacda705 /scripts/headers_check.pl
parent34f3a814eef8069a24e5b3ebcf27aba9dabac2ea (diff)
parent45beca08dd8b6d6a65c5ffd730af2eac7a2c7a03 (diff)
Merge commit 'v2.6.28-rc3' into sched/core
Diffstat (limited to 'scripts/headers_check.pl')
-rw-r--r--scripts/headers_check.pl10
1 files changed, 5 insertions, 5 deletions
diff --git a/scripts/headers_check.pl b/scripts/headers_check.pl
index 15d53a6b1a1..488a3b1f760 100644
--- a/scripts/headers_check.pl
+++ b/scripts/headers_check.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/perl -w
#
# headers_check.pl execute a number of trivial consistency checks
#
@@ -17,7 +17,6 @@
# 2) TODO: check for leaked CONFIG_ symbols
use strict;
-use warnings;
my ($dir, $arch, @files) = @ARGV;
@@ -27,14 +26,15 @@ my $lineno = 0;
my $filename;
foreach my $file (@files) {
+ local *FH;
$filename = $file;
- open(my $fh, '<', "$filename") or die "$filename: $!\n";
+ open(FH, "<$filename") or die "$filename: $!\n";
$lineno = 0;
- while ($line = <$fh>) {
+ while ($line = <FH>) {
$lineno++;
check_include();
}
- close $fh;
+ close FH;
}
exit $ret;