Permalink
Browse files

Note the number of distributions to be tested.

Gives some idea of how long it will run.
  • Loading branch information...
1 parent 929e905 commit 83845f6e0c8577b919081343e97ef0abbed098a5 @schwern schwern committed Dec 10, 2012
Showing with 2 additions and 0 deletions.
  1. +2 −0 dist/test_dists
View
@@ -22,6 +22,8 @@ my @dist_list = @ARGV ? @ARGV : get_distributions("/Test-/");
my @failed_dists;
+note sprintf "%d dists to test", scalar @dist_list;
+
for my $dist (@dist_list->shuffle) {
my($mod_name) = $dist =~ m{([^/]+)$};
$mod_name =~ s{-[^-]+$}{};

0 comments on commit 83845f6

Please sign in to comment.