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

(-)a/t/00-testcritic.t (-1 / +1 lines)
Lines 14-18 if ( $EVAL_ERROR ) { Link Here
14 
}
 14 
}
15 

          15
          

        

        

          16
          
Test::Perl::Critic->import( -profile => '.perlcriticrc' );

          16
          
Test::Perl::Critic->import( -profile => '.perlcriticrc' );

        

          
            

              17
              
my @files = map { chomp; $_ } `git ls-tree -r master --name-only`;    # only files part of git


              17
              
my @files = map { chomp; $_ } `git ls-tree -r HEAD --name-only`;    # only files part of git

            

        

          18
          
all_critic_ok(@files);

          18
          
all_critic_ok(@files);

        



(-)a/xt/check_makefile.t
      (-2 / +1 lines)




  

    
      
            Lines 26-32
          use File::Slurp qw( read_file );
      
      
        Link Here
      
    
  

        

          26
          
use Data::Dumper;

          26
          
use Data::Dumper;

        

        

          27
          

          27
          

        

        

          28
          
my $curdir = File::Spec->curdir();

          28
          
my $curdir = File::Spec->curdir();

        

          
            

              29
              
my @dirs = `git ls-tree -d --name-only master`;


              29
              
my @dirs = `git ls-tree -d --name-only HEAD`;

            

        

          30
          
my $makefile = read_file("$curdir/Makefile.PL");

          30
          
my $makefile = read_file("$curdir/Makefile.PL");

        

        

          31
          
my @missing;

          31
          
my @missing;

        

        

          32
          
for my $d ( sort @dirs ) {

          32
          
for my $d ( sort @dirs ) {

        

            

              33
              
- 

              
              
            






  

  Return to bug 34911