checkincludes.pl: close file as soon as we're done with it

[karo-tx-linux.git] / scripts / checkincludes.pl

diff --git a/scripts/checkincludes.pl b/scripts/checkincludes.pl
index 8e6b716c191c67a1b0668caf43a8bf777b271299..32ebff659fccd2677782560d9fcb70c3a5930536 100755 (executable)
--- a/scripts/checkincludes.pl
+++ b/scripts/checkincludes.pl
@@ -13,12 +13,12 @@ foreach $file (@ARGV) {
                        ++$includedfiles{$1};
                }
        }
+
+       close(FILE);
        
        foreach $filename (keys %includedfiles) {
                if ($includedfiles{$filename} > 1) {
                        print "$file: $filename is included more than once.\n";
                }
        }
-
-       close(FILE);
 }