diff options
Diffstat (limited to 'src')
| -rwxr-xr-x | src/tools/copyright.pl | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src/tools/copyright.pl b/src/tools/copyright.pl index 2ef35d25256..a55228d6ec8 100755 --- a/src/tools/copyright.pl +++ b/src/tools/copyright.pl @@ -37,16 +37,16 @@ sub wanted # skip file names with binary extensions # How are these updated? bjm 2012-01-02 - return - if ( - $_ =~ m/\.(ico|bin)$); + return if ($_ =~ m/\.(ico|bin)$/); - my @lines; - tie @lines, "Tie::File", $File::Find::name; + my @lines; + tie @lines, "Tie::File", $File::Find::name; - foreach my $line (@lines) { - # We only care about lines with a copyright notice. - next unless $line =~ m/$cc . *$pgdg /; + foreach my $line (@lines) + { + + # We only care about lines with a copyright notice. + next unless $line =~ m/$cc . *$pgdg /; # We stop when we've done one substitution. This is both for # efficiency and, at least in the case of this program, for |