newline simplification

diff --git a/mr b/mr
index 17418124d2011194ed5c084afbb2e5eefbc70f8c..5cdf9d42d95c364e99089d61367fb3099ea28d76 100755 (executable)
--- a/mr
+++ b/mr
@@ -224,7 +224,6 @@ foreach my $topdir (sort keys %config) {
 }
 
 my (@failed, @successful, @skipped);
-my $first=1;
 foreach my $topdir (sort keys %config) {
        foreach my $subdir (sort keys %{$config{$topdir}}) {
                next if $subdir eq 'default';
@@ -299,8 +298,7 @@ sub action {
                        push @successful, $dir;
                }
 
-               print "\n" unless $first;
-               $first=0;
+               print "\n";
        }
 }
 
@@ -313,7 +311,6 @@ sub showstat {
        }
        return;
 }
-print "\n" unless $first;
 print "mr $action: finished (".join("; ",
        showstat($#successful+1, "successful", "successful"),
        showstat($#failed+1, "failed", "failed"),