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 (file)
--- 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();