diff options
author | Johnny Willemsen <jwillemsen@remedy.nl> | 2017-03-08 09:43:40 +0100 |
---|---|---|
committer | Johnny Willemsen <jwillemsen@remedy.nl> | 2017-03-08 09:43:40 +0100 |
commit | caf20d29f0c28f3cf5b855e9f2694b14ff538bb7 (patch) | |
tree | 4ded14be05d89c8ca99325e9ff0c6a9c5d181b82 | |
parent | 6175b93927ffff03b1d6331f9f1351e04d8a5327 (diff) | |
download | ATCD-caf20d29f0c28f3cf5b855e9f2694b14ff538bb7.tar.gz |
Check *.features for old Id tag
* ACE/bin/fuzz.pl:
-rwxr-xr-x | ACE/bin/fuzz.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/ACE/bin/fuzz.pl b/ACE/bin/fuzz.pl index 0d7ced3a25f..5053b0b6115 100755 --- a/ACE/bin/fuzz.pl +++ b/ACE/bin/fuzz.pl @@ -54,6 +54,7 @@ use PerlACE::Run_Test; @files_doxygen = (); @files_conf = (); @files_rb = (); +@files_features = (); # To keep track of errors and warnings $errors = 0; @@ -187,6 +188,9 @@ sub store_file ($) elsif ($name =~ /\.(rb|erb)$/i) { push @files_rb, ($name); } + elsif ($name =~ /\.features$/i) { + push @files_features, ($name); + } elsif ($name =~ /\.vcproj$/i) { push @files_vcproj, ($name); } @@ -296,7 +300,7 @@ sub check_for_id_string () print "Running \$Id\$ string check\n"; foreach $file (@files_cpp, @files_inl, @files_h, @files_mpc, @files_bor, @files_gnu, @files_html, @files_idl, @files_pl, - @files_cdp, @files_py, @files_conf, @files_generic) { + @files_cdp, @files_py, @files_conf, @files_generic, @files_features) { my $found = 0; if (open (FILE, $file)) { print "Looking at file $file\n" if $opt_d; |