diff options
author | brunsch <brunsch@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2000-06-04 01:57:09 +0000 |
---|---|---|
committer | brunsch <brunsch@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2000-06-04 01:57:09 +0000 |
commit | 33f6c473417472786c6b375534eeb36ff62336bd (patch) | |
tree | ce1f24ae70f5a36e44d4afd5f986949c042032d6 /bin/fuzz.pl | |
parent | 0e3e52baf98133eadb07a10a508581ff725171b2 (diff) | |
download | ATCD-33f6c473417472786c6b375534eeb36ff62336bd.tar.gz |
ChangeLogTag:Sat Jun 3 18:51:46 2000 Darrell Brunsch <brunsch@uci.edu>
Diffstat (limited to 'bin/fuzz.pl')
-rwxr-xr-x | bin/fuzz.pl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/bin/fuzz.pl b/bin/fuzz.pl index 5ee6932b2f2..55a2a86fc9e 100755 --- a/bin/fuzz.pl +++ b/bin/fuzz.pl @@ -274,7 +274,10 @@ sub check_for_line_length () print "Looking at file $file\n" if $opt_d; while (<FILE>) { ++$line; - if (/.{80,}/) { + + # Make sure to ignore ACE_RCSID lines, since they + # are difficult to get under 80 chars. + if (/.{80,}/ and !/^ACE_RCSID/) { print_error ("Over 80 chars on line $line in $file"); } } @@ -351,7 +354,7 @@ sub check_for_tchar if (/ASYS_TEXT/) { print_error ("ASYS_TEXT on line $line in $file"); } - elsif (/TEXT/ and $` !~ /ACE_/) { + elsif (/TEXT\s+\(/ and $` !~ /ACE_/) { print_error ("TEXT found on line $line in $file"); } } |