From: Aaron Crane <perl@aaroncrane.co.uk>
Date: Wed, 14 Jan 2009 09:51:44 +0000 (+0000)
Subject: applying patches and upstream
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f340d83a2dfc7d46ec2faecd54348728374a83bb;p=p5sagit%2Fp5-mst-13.2.git

applying patches and upstream

Nicholas Clark writes:
>     $ perl Porting/Maintainers --opened
>     (No files are modified)

I think that message would be even more helpful if it went to stderr;
(trivial) patch attached.

--
Aaron Crane ** http://aaroncrane.co.uk/

From afa6ac1c2f6bde792be6ac065a87119e1dbdafee Mon Sep 17 00:00:00 2001
From: Aaron Crane <perl@aaroncrane.co.uk>
Date: Wed, 14 Jan 2009 09:46:33 +0000
Subject: [PATCH] Send informative output to stderr, not stdout
---

diff --git a/Porting/Maintainers.pm b/Porting/Maintainers.pm
index a6aaaa0..0b03e05 100644
--- a/Porting/Maintainers.pm
+++ b/Porting/Maintainers.pm
@@ -253,7 +253,7 @@ sub show_results {
 	}
     }
     elsif ($Opened) {
-	print "(No files are modified)\n";
+	print STDERR "(No files are modified)\n";
     }
     else {
 	usage();