Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Don't try to copy the build log if its not there.

Else the program will die.  This can happen if the test exits via timeout.
  • Loading branch information...
commit 329d1cc5b7011a18d312b584c0a1845120bfd71e 1 parent 8d2c9b0
@schwern schwern authored
Showing with 3 additions and 2 deletions.
  1. +3 −2 dist/test_dists
View
5 dist/test_dists
@@ -75,8 +75,9 @@ for my $dist (@dist_list->shuffle) {
# Save the build log.
my $mod_file = $mod_name =~ s/::/-/gr;
my $lib_id = $perl5lib =~ s/\//-/gr;
- my $new_file = $temp->child("$mod_file-$lib_id-build.log");
- path('~/.cpanm/latest-build/build.log')->copy($new_file);
+ my $latest_build_log = '~/.cpanm/latest-build/build.log';
+ my $save_build_log = $temp->child("$mod_file-$lib_id-build.log");
+ path($latest_build_log)->copy($save_build_log) if -e $latest_build_log;
}
is( $results[0], $results[1], "$mod_name - install vs dev" ) || push @failed_dists, $mod_name;
Please sign in to comment.
Something went wrong with that request. Please try again.