diff options
author | Nicholas Clark <nick@ccl4.org> | 2009-01-13 17:57:54 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2009-01-13 17:57:54 +0000 |
commit | c5654d5b66b28416dd42561adb54cb0e1ca1cefd (patch) | |
tree | 060614e1bc450ab14567ddc03f00151b5441fe04 /Porting/Maintainers.pm | |
parent | fdd40f9619a93646220d5fc6d6fe637d58906adb (diff) | |
download | perl-c5654d5b66b28416dd42561adb54cb0e1ca1cefd.tar.gz |
Add the upstream status to the output of Porting/Maintainers for --opened.
Diffstat (limited to 'Porting/Maintainers.pm')
-rw-r--r-- | Porting/Maintainers.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Porting/Maintainers.pm b/Porting/Maintainers.pm index d3d1dbdc8b..e457efc7ee 100644 --- a/Porting/Maintainers.pm +++ b/Porting/Maintainers.pm @@ -240,7 +240,8 @@ sub show_results { if (defined $ModuleByFile{$file}) { my $module = $ModuleByFile{$file}; my $maintainer = $Modules{$ModuleByFile{$file}}{MAINTAINER}; - printf "%-15s $module $maintainer $Maintainers{$maintainer}\n", $file; + my $upstream = $Modules{$module}{UPSTREAM}||'unknown'; + printf "%-15s [%-7s] $module $maintainer $Maintainers{$maintainer}\n", $file, $upstream; } else { printf "%-15s ?\n", $file; } |