View | Details | Raw Unified | Return to bug 4330
Collapse All | Expand All

(-)a/misc/code_fixing/find-license-problems.pl (-2 / +1 lines)
Lines 60-66 sub has_gpl2plus_and_current_fsf_address { Link Here
60 
           ($hasgpl && $hasv2 && $hasorlater && $hasfranklinst);
 60 
           ($hasgpl && $hasv2 && $hasorlater && $hasfranklinst);
61 
}
 61 
}
62 

          62
          

        

          
            

              63
              


              63
              
push @ARGV, '.' unless @ARGV;

            

        

          64
          
find({ wanted => \&wanted, no_chdir => 1 }, @ARGV);

          64
          
find({ wanted => \&wanted, no_chdir => 1 }, @ARGV);

        

        

          65
          
foreach my $name (@files) {

          65
          
foreach my $name (@files) {

        

        

          66
          
    if (! has_gpl2plus_and_current_fsf_address($name)) {

          66
          
    if (! has_gpl2plus_and_current_fsf_address($name)) {

        

            

              67
              
- 

              
              
            






  

  Return to bug 4330