mirror of
https://develop.openfoam.com/Development/openfoam.git
synced 2025-11-28 03:28:01 +00:00
find-longlines
* output full file path * some preliminary file edits to restore 80-col max.
This commit is contained in:
@ -31,7 +31,7 @@ sub wanted {
|
||||
if ( $maxlen < length ) {
|
||||
$count++;
|
||||
substr( $_, $maxlen, 0 ) = "||->>"; # show truncation point
|
||||
print "$ARGV $. $_\n";
|
||||
print "$File::Find::name $. $_\n";
|
||||
}
|
||||
}
|
||||
close ARGV;
|
||||
|
||||
Reference in New Issue
Block a user