* Output list of failed repos to stderr when -s is used.

[code/myrepos.git] / mr

diff --git a/mr b/mr
index 8e845a903f111786edd8fee88f059a7132cc1765..95a7fe86a77535968990064cdad62c573a1a3227 100755 (executable)
--- a/mr
+++ b/mr
@@ -316,7 +316,7 @@ elsif ($action eq 'config') {
        }
        my $section=shift;
        if ($section=~/^\//) {
-               # try to convert to a path relative to $config's dir
+               # try to convert to a path relative to the config file
                my ($dir)=$ENV{MR_CONFIG}=~/^(.*\/)[^\/]+$/;
                if ($section=~/^\Q$dir\E(.*)/) {
                        $section=$1;
@@ -537,7 +537,7 @@ if ($stats) {
                print "mr $action: (skipped: ".join(" ", @skipped).")\n";
        }
        if (@failed) {
-               print "mr $action: (failed: ".join(" ", @failed).")\n";
+               print STDERR "mr $action: (failed: ".join(" ", @failed).")\n";
        }
 }
 if (@failed) {