File tree Expand file tree Collapse file tree 1 file changed +8
-8
lines changed Expand file tree Collapse file tree 1 file changed +8
-8
lines changed Original file line number Diff line number Diff line change @@ -37,16 +37,16 @@ sub wanted
3737
3838 # skip file names with binary extensions
3939 # How are these updated? bjm 2012-01-02
40- return
41- if (
42- $_ =~ m /\. (ico|bin)$ );
40+ return if ($_ =~ m /\. (ico|bin)$ / );
4341
44- my @lines ;
45- tie @lines , "Tie::File", $File::Find::name ;
42+ my @lines ;
43+ tie @lines , " Tie::File" , $File::Find::name ;
4644
47- foreach my $line (@lines ) {
48- # We only care about lines with a copyright notice.
49- next unless $line =~ m/ $cc . *$pgdg /;
45+ foreach my $line (@lines )
46+ {
47+
48+ # We only care about lines with a copyright notice.
49+ next unless $line =~ m /$cc . *$pgdg / ;
5050
5151 # We stop when we've done one substitution. This is both for
5252 # efficiency and, at least in the case of this program, for
You can’t perform that action at this time.
0 commit comments